使用'R'中的'ggvenn'在Venn图中缺少集合`

我有一个包含7组数据的列表。下面的代码

genes <- paste("gene",1:1000,sep="")
x <- list(
   A = sample(genes,300), 
   B = sample(genes,525), 
   C = sample(genes,440),
   D = sample(genes,350),
   E = sample(genes,100),
   EE = sample(genes,120),
   G = sample(genes,102))

library(ggvenn)
ggvenn(x,  stroke_size = 0.5, set_name_size = 4)

---

genes要绘制图表，请使用venn包中的
venn:：venn（x）
。但是，要获取内部元素，请使用gplots包中的
属性（gplots:：venn（x，show.plot=FALSE））$crossions


如果您只对前10个元素感兴趣，这将起作用：
sappy（属性（gplots:：venn（x，show.plot=FALSE））$crossions，function（x）x[1:10]）