在Vennerable包装中手动设置维恩图的颜色

Question

您好，我希望能够手动分配颜色。 例如

library(Vennerable)
data(StemCell)
  w <- Venn(Sets=StemCell[1:2])
  plot(w, type="squares")

产生

然而，我想做的是手动改变颜色，OCT4 =红色，重叠=棕色，Sox2 =绿色？ 目前的套餐有可能吗？我尝试设置gpar，但它似乎没有做任何特别的事情。

谢谢！ 甲

Answer 1

部分内容记录在Vennerable插图（插图（“Venn”）），第2.3节图形参数和VennThemes手册页（？VennThemes）中

您希望自定义需要使用除Venn（）之外的compute.Venn（）来计算适当的图表，然后您可以使用VennThemes（）进行自定义。

您所需的自定义代码如下所示：

w <- compute.Venn(Venn(Sets=StemCell[1:2]), type = "squares")
gp <- VennThemes(w)
gp[["Face"]][["11"]]$fill <-  "brown"
gp[["Face"]][["01"]]$fill <-  "green"
gp[["Face"]][["10"]]$fill <-  "red"
plot(w, gp = gp)

您可以查看对象“gp”，其中包含所有可视化设置，例如上面代码中更改的Venn的填充，以及线条，文本等的颜色。玩得开心玩。 / p> 顺便说一句，在插图中，他们使用了网格包

library(grid)
grid.newpage()

擦拭石板。否则你就是将维恩绘制在维恩图的顶部。