计算重叠后打印维恩图

我试图使用VennDiagram包内的calculate.overlap函数来首先计算并打印维恩图。我能够计算出我的数据集的重叠，但正在寻找如何打印维恩图形的帮助。任何人都可以提供援助我通读了文档，但没有找到。计算重叠后打印维恩图

> library('VennDiagram') 

# A simple single-set diagram 
cardiome <- letters[1:10] 
superset <- letters[8:24] 
overlap <- calculate.overlap(
x = list(
"Cardiome" = cardiome, 
"SuperSet" = superset 
) 
);

来源

2017-08-27 mrmatt11

另一个简单的例子，示出了如何使用VennDiagram包打印的文氏图：

library(VennDiagram) 
cardiome <- letters[1:10] 
superset <- letters[8:24] 
overlap <- calculate.overlap(
x <- list("Cardiome"=cardiome, "SuperSet"=superset)) 

venn.plot <- draw.pairwise.venn(
    area1 = length(cardiome), 
    area2 = length(superset), 
    cross.area = length(overlap), 
    category = c("Cardiome", "Superset"), 
    fill = c("blue", "red"), 
    lty = "blank", 
    cex = 2, 
    cat.cex = 2, 
    cat.pos = c(180, 180), 
    cat.dist = 0.05, 
    cat.just = list(c(0, 1), c(1, 1)) 
    ) 
grid.draw(venn.plot) 
savePlot(filename="venndiag", type="png")

维恩图与项目标签集合内：

library(RAM) 
vectors <- list(Cardiome=cardiome, Superset=superset) 
group.venn(vectors=vectors, label=TRUE, 
    fill = c("blue", "red"), 
    cat.pos = c(180, 180), 
    lab.cex=1.1)

来源

2017-08-27 08:19:06

马可，它可能是值得加入的第二部分作为asnwer到https://stackoverflow.com/questions/25019794/venn-diagram-with-item-labels – user20650

@MarcoSandri真的爱第二部分（RAM包）。 +1为:) – Prem

功能venn.diagram()做到了。例如在你的例子中

venn.diagram(x = list(
    "Cardiome" = cardiome, 
    "SuperSet" = superset 
), "plot_venn")

它保存到工作目录。键入getwd()以查看其设置。

更多信息，请参见

?venn.diagram()

。

来源

2017-08-27 08:15:49

?venn.diagram表明，这种

library('VennDiagram') 
venn.plot <- venn.diagram(
    x = list(
    cardiome = letters[1:10], 
    superset = letters[8:24] 
), 
    filename = NULL 
); 
grid.draw(venn.plot);

来源

2017-08-27 08:21:54 Prem

计算重叠后打印维恩图

回答

相关问题