定制欧拉图的色彩搭配eulerr [R

Question

我试图通过R.我下面this example其中开发说明如何自定义颜色/边框透明度约翰·拉松使用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) 

颜色/边框保持不变。

我使用RStudio 1.0.136，R 3.3.1在Windows上。

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, 
    fill = c("dodgerblue4", "darkgoldenrod1", "cornsilk4"), 
    border = "transparent", 
    fontsize = 8, 
    counts = list(fontsize = 8))