eulerr包中的调色板

Question

我真的很喜欢eulerr包。它创造了美丽的情节。然而，我没有对颜色的眼光，因此我想使用现有的配色方案，如“绿色”或“岩浆”。这是可能的吗?或者这些方案是否仅限于连续数据？

Answer 1

是的，这是可能的

library(viridis)
library(eulerr)

拉动一些绿色的颜色。我使用等离子刻度(你可以使用岩浆，地狱，任何你喜欢的刻度)，并拉出4种颜色，因为这就是演示图中更低的重叠区域。

colors <- c(viridis::plasma(n = 4))

制作eulerr图，来自eulerr演示here

fit1 <- euler(c("A" = 25, "B" = 5, "C" = 5,
            "A&B" = 5, "A&C" = 5, "B&C" = 3,
            "A&B&C" = 3))
set.seed(1)
mat <-
  cbind(
    A = sample(c(TRUE, TRUE, FALSE), size = 50, replace = TRUE),
    B = sample(c(TRUE, FALSE), size = 50, replace = TRUE),
    C = sample(c(TRUE, FALSE, FALSE, FALSE), size = 50, replace = TRUE)
  )
fit2 <- euler(mat)

用我们的viridis颜色绘制欧拉图

plot(fit2,
fills = list(fill = colors),
edges = list(lty = 1:3),
labels = list(font = 2))