在R中註釋維恩圖

Question

我的問題涉及如何使用任何R包除了默認計數 以外的實際值註釋維恩圖。 下面是數據的小例子：

list.items <- list(method1=c("item1","item2","item3","item4","item5","item6"), 
        method2=c("item1","item7","item3","item4","item8","item6"), 
        method3=c("item1","item7","item9","item4","item10","item11")) 
library(gplots) 
venn(list.items) 

這將返回維恩圖： 我希望看到例如什麼3項方法3實際上是誰？例如item3，item5 & item7。

我想有一個如下圖所示的維恩圖： http://openi.nlm.nih.gov/detailedresult.php?img=3026361_1471-2105-11-S6-S14-9&req=4 任何援助將不勝感激。

Answer 1

它從文檔看來不可能做到你想要的gtools和gplots。可能使用enter link description here R-Forge的vennDiagram包或Vennerable。

但是，這裏有一種方法可以使用venneuler包顯示元素。

library("venneuler") 
df <- data.frame(method1=c("item1","item2","item3","item4","item5","item6"), 
       method2=c("item1","item7","item3","item4","item8","item6"), 
       method3=c("item1","item7","item9","item4","item10","item11")) 
vd <- venneuler(df) 
plot(vd)