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

Question

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

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

生产

但是我想做的是手动更改颜色，OCT4=red，overlap=brown 和 Sox2=green？这可能与当前包？我尝试设置 gpar 但它似乎没有做任何特别的事情。

谢谢！ A

Answer 1

部分内容记录在 Vennerable 小插图 (vignette("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"，它包含所有可视化设置，例如上面代码中更改的维恩填充，还有线条颜色、文本等。玩得开心

顺便说一句，在小插图中，他们使用了网格包

library(grid)
grid.newpage()

擦石板。否则，您将在维恩图之上绘制维恩图。

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

Manually set color for venn diagrams in Vennerable package

r

venn-diagram