我有一个像列联表这样的数据，它显示了大量的数据，但我想从这个数据帧中绘制维恩图。
我的数据结构：
species_abundance<-data.frame(Genus = c("Parasphingorhabdus", "Loktanella", "Cytobacillus", "Paracoccus", "Paucisalibacillus", "Kytococcus", "Salinibacterium", "Acinetobacter baumanni","Marinococcus","Bacillus"),
S3 = c(0, 0, 1, 1, 0, 0, 1,0,4,0),
S5 = c(0, 0, 0, 1, 1, 0, 1,0,3,5),
S7 = c(3, 1, 0, 2, 0, 1, 0,0,3,1),
S9 = c(0, 1, 0, 3, 0, 0, 0,1,2,0)
我如何从这个数据框中绘制维恩图，以便找到不同站（S3、S5、S7......）的独特和共享物种？
如果我按照下面给出的方式转换数据并尝试使用 Venny2，我将得到这样的图像，类似的图像并发现我想使用 R 做，请帮助
species_abundance1<-data.frame(S3 = c("", "", "Cytobacillus", "Paracoccus", "", "", "Salinibacterium","", "Marinococcus", ""),
S5 = c("", "", "", "Paracoccus", "Paucisalibacillus", "", "Salinibacterium","", "Marinococcus","Bacillus"),
S7 = c("Parasphingorhabdus", "Loktanella", "", …