Difference between revisions of "Vennerable"
From Crop Genomics Lab.
(Created page with "library(Vennerable) data <- read.table("organ.groups.binary.txt.parsed.VennRawInput",col.names='') organ <- c("Y","SG","MF","LG","Leaf","FF","B") png(filename="Venn.png",wi...") |
|||
Line 1: | Line 1: | ||
library(Vennerable) | library(Vennerable) | ||
− | data <- read.table("organ.groups.binary.txt.parsed.VennRawInput",col.names= | + | data <- read.table("organ.groups.binary.txt.parsed.VennRawInput",col.names="") |
organ <- c("Y","SG","MF","LG","Leaf","FF","B") | organ <- c("Y","SG","MF","LG","Leaf","FF","B") |
Latest revision as of 10:27, 9 March 2016
library(Vennerable)
data <- read.table("organ.groups.binary.txt.parsed.VennRawInput",col.names="")
organ <- c("Y","SG","MF","LG","Leaf","FF","B")
png(filename="Venn.png",width=2000,height=2000)
plot(Venn(SetNames=organ, Weight=as.vector(data$X)),doWeights=F)
dev.off()