手动设置Venn图中的维恩图颜色
问题描述:
嗨我希望能够手动分配颜色。 例如手动设置Venn图中的维恩图颜色
library(Vennerable)
data(StemCell)
w <- Venn(Sets=StemCell[1:2])
plot(w, type="squares")
但是我会做的是manaully改变颜色,OCT4 =红色,重叠=棕色和Sox2 =绿色什么? 这是可能与当前包?我尝试设置gpar,但它并没有特别做任何事情。
谢谢! 一个
答
的本部在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)
你可以看一下对象“GP”,包含所有可视化设置,比如维恩的填补被改变在上面的代码中,还有线条,文字等的颜色。玩得开心玩耍。
顺便说一句,在小插曲,他们利用格包
library(grid)
grid.newpage()
的擦拭石板。否则,你将维恩绘制在维恩图上。
这很棒。有用!你知道一旦创建它的主题是否可以重复使用。我能想到的唯一可能就是把它作为一个函数包装起来,然后重用它。无论如何,很酷的感谢。 – Ahdee
不确定。由于gp依赖于由compute.Venn(Venn((...))创建的venn对象,我猜测你不能只重新应用任何给定的维恩对象上的gp,除非它非常相似(可能略有不同的数字,但除此之外同样的),然后我不确定,例如gp包含了多少个圆圈和对象组成的重叠,只要检查一下gp的内容就可以看到它包含的内容,然后简单地尝试一下 – 4rj4n
再次感谢。把它包装成一个简单的函数,这样我所要做的就是提供两个向量。 – Ahdee