在Vennerable套件中為Venn圖手動設置顏色

Question

嗨，我希望能夠手動分配顏色。 例如

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

產生

但是我想做的是手動更改顏色，OCT4 =紅色，重疊=棕色，Sox2 =綠色？ 當前的軟件包有可能嗎？ 我嘗試設置gpar，但似乎並沒有做任何特別的事情。

謝謝！ 一種

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”，其中包含所有可視化設置，例如在上面的代碼中更改的Venn的填充，還包括線條，文本的顏色，等等。

順便說一句，在小插圖中，他們使用了網格包

library(grid)
grid.newpage()

擦板岩。 否則，您將在Venn圖的頂部繪制Venn。