sil*_*egt 2 plot r venn-diagram
我试图通过约翰·拉松使用eulerr包绘制欧拉图中R.我下面这个例子,其中开发人员介绍了如何自定义颜色/边框的透明度。但是,当我尝试使用以下代码实现它时:
fit2 <- euler(c(A = 16971, B = 218, C = 215,
"A&B" = 112, "A&C" = 112, "B&C"= 51,"A&B&C" = 23))
plot(fit2,
polygon_args = list(col = c("dodgerblue4", "darkgoldenrod1", "cornsilk4"),
border = "transparent"),
text_args = list(font = 8), counts=TRUE)
Run Code Online (Sandbox Code Playgroud)
颜色/边框保持不变。
我在Windows上使用RStudio 1.0.136,R 3.3.1。
为此事道歉。那篇文章很陈旧,争论也变了。
试试这个
fit2 <- euler(c(A = 16971, B = 218, C = 215,
"A&B" = 112, "A&C" = 112, "B&C"= 51,"A&B&C" = 23))
plot(fit2,
fills = c("dodgerblue4", "darkgoldenrod1", "cornsilk4"),
edges = FALSE,
fontsize = 8,
quantities = list(fontsize = 8))
Run Code Online (Sandbox Code Playgroud)