Difference between revisions of "Vennerable"

From Crop Genomics Lab.
Jump to: navigation, search
(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()