用eulerr R定制欧拉图颜色

Question

我试图用Johan在R中的eulerr包绘制一个欧拉图，我遵循的是这个例子，开发人员在这里解释了如何自定义颜色/边框透明度。但是，当我尝试用以下代码实现它时：

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)

颜色/边框保持不变。

我在Windows上使用的是RStudio 1.0.136，R3.3.1。

Answer 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))

​

​