r - 使用 eulerr R 自定义欧拉图颜色

Question

我正在尝试使用 Johan Larsson 在 R 中的 eulerr 包绘制欧拉图。我正在关注 this example开发人员解释如何自定义颜色/边框透明度。但是，当我尝试使用以下代码实现它时:

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、R 3.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))