Как изменить размер шрифта в графике Эйлера в R?

Question

Я пытаюсь создать диаграмму Эйлера в R, используя пакет eulerr. Я хотел бы уменьшить размер шрифта количественного текста на графике.

Я пробовал использовать cex=0.5 (как в примере ниже), а также пробовал fontsize = и font =, но ни один из них не уменьшил размер шрифта. Я помещаю 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)

Answer 1

Вы можете изменить размер текста величин, передав список, определяющий размер этому аргументу, следующим образом:

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