如何更改 R 中欧拉图中的字体大小?

How to change font size in Euler plot in R?

我正在尝试使用 eulerr 包在 R 中创建欧拉图。我想减小图上数量文本的字体大小。

我试过使用 cex=0.5(如下例所示),也试过 fontsize =font =,但 none 减小了字体大小。我是不是把 cex=0.5 放在了错误的位置?

    library(eulerr)

    set1 <- euler(c("A&B" = 3103,
            "A&C" = 1034,
            "A&D" = 118,
            "B&C" = 2690,
            "B&D" = 1017,
            "C&D" = 1383,
            "A&B&C" = 394,
            "A&B&D" = 73,
            "A&C&D" = 45,
            "B&C&D" = 153,
            "A&B&C&D" = 32))

    eulerr.plot <- plot(set1,
                fills = list(fill = c("#009292", "#FFB6DB", "#B66DFF", "#6DB6FF"), alpha = 0.7),
                labels = NULL, quantities = TRUE, legend = list(labels = c("A", "B", "C", "D")), cex = 0.5)

您可以通过将定义大小的列表传递给该参数来更改数量的文本大小,如下所示:

plot(set1,  fills = list(fill = c("#009292", "#FFB6DB", "#B66DFF", "#6DB6FF"), alpha = 0.7),
                    labels = NULL, quantities = list(cex = .5), legend = list(labels = c("A", "B", "C", "D")))