Dear all, I would like to draw a Venn plot for data represented by 6 variables. I know how to do this using the package venneuler (which requires rJava). However this package does not report the numbers of elements within each class.
Do you know how to display the number of elements using either this or
other packages?
Best wishes,
Luigi
library(venneuler)
library(rJava)
a<-c( 1, 1, 1, 1, 1, 1,
1,
1, 1, 1, 1, 1, 1, 1,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0)
b<-c( 0, 0, 0, 0, 0, 0,
0,
0, 0, 0, 0, 0, 0, 0,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0)
c<-c( 0, 0, 0, 0, 0, 0,
0,
0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0)
d<-c( 0, 0, 0, 0, 0, 0,
0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 1, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0)
e<-c( 1, 1, 1, 0, 0, 0,
0,
0, 0, 0, 0, 0, 0, 0,
1, 1, 0, 1, 0, 0, 1,
1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1, 1, 0, 0,
0, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 0, 0, 1,
1, 1, 1, 0, 0, 0, 0,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 0)
f<-c( 0, 0, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 1, 1, 0, 1,
1, 1, 0, 0, 1, 1, 0,
1, 0, 1, 1, 1, 1, 0,
0, 1, 0, 0, 0, 1, 1,
1, 1, 1, 0, 1, 0, 1,
0, 0, 1, 0, 1, 1, 1,
0, 0, 0, 0, 1, 1, 1,
1, 0, 1, 1, 1, 0, 1,
0, 0, 1, 1, 0, 0, 1,
1, 1, 0, 0, 0, 1, 1,
0, 1, 1, 1, 1, 1, 1,
0, 0, 1, 1, 1, 1, 1,
0, 0, 1, 0, 1, 1, 1,
1)
data<-cbind(a,b,c,d,e,f)
plot(venneuler(data), main="test")
[[alternative HTML version deleted]]
______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
