2017-07-27 459 views
0

嗨我希望能夠手動分配顏色。 例如手動設置Venn圖中的維恩圖顏色

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

產生 enter image description here

但是我會做的是manaully改變顏色,OCT4 =紅色,重疊=棕色和Sox2 =綠色什麼? 這是可能與當前包?我嘗試設置gpar,但它並沒有特別做任何事情。

謝謝! 一個

回答

2

的本部在Vennerable小插曲是記錄(暗角(「維恩」)),第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) 

Customized Venn plot

你可以看一下對象「GP」,包含所有可視化設置,比如維恩的填補被改變在上面的代碼中,還有線條,文字等的顏色。玩得開心玩耍。

順便說一句,在小插曲,他們利用格包

library(grid) 
grid.newpage() 

的擦拭石板。否則,你將維恩繪製在維恩圖上。

+0

這很棒。有用!你知道一旦創建它的主題是否可以重複使用。我能想到的唯一可能就是把它作爲一個函數包裝起來,然後重用它。無論如何,很酷的感謝。 – Ahdee

+0

不確定。由於gp依賴於由compute.Venn(Venn((...))創建的venn對象,我猜測你不能只重新應用任何給定的維恩對象上的gp,除非它非常相似(可能略有不同的數字,但除此之外同樣的),然後我不確定,例如gp包含了多少個圓圈和對象組成的重疊,只要檢查一下gp的內容就可以看到它包含的內容,然後簡單地嘗試一下 – 4rj4n

+0

再次感謝。把它包裝成一個簡單的函數,這樣我所要做的就是提供兩個向量。 – Ahdee