使图例符号小于 R 华夫饼图中的默认值

Question

我有一个由两部分组成的华夫饼图，其中有很多小方块，还有一个包含两个方块的图例。我想让所有这些方块的大小都一样。

有一个 issue 在 GitHub 上打开了关于这个，repo 所有者说因为 waffle() returns 一个 ggplot2 对象，我们可以使用 guide() 来做这个。

我尝试搜索文档来执行此操作并想出了

library(waffle)

phrase_count = 17345/10000
all_count = (22784085 - phrase_count)/10000

my_waffle = waffle(c("All"=all_count, "Phrases"=phrase_count), 
                   rows=43, 
                   size=0.6,
                   colors=c("#969696", "pink", "white"),
                   flip=TRUE)

my_waffle + guides(colour=guide_legend(override.aes = list(size=0.6)))

但这并不影响图例的大小。我见过人们使用 color、colour 或 shape，但这些参数中的 none 对我有用。

如何让图例中的方块大小与图中方块的大小相同？

Answer 1

尝试为您的图例键设置 theme()，因为华夫饼对象来自 ggplot2 自然界，正如@Waldi 在评论中提到的：

#Code
my_waffle <- my_waffle + theme(legend.key.size = unit(3, "mm"))

输出：

或者这样：

#Code 2
my_waffle + theme(legend.key.height = unit(0.2, "cm"),
                  legend.key.width = unit(0.3, "cm"))

输出：

使图例符号小于 R 华夫饼图中的默认值

Make legend symbols smaller than default in R waffle plot

r

ggplot2

waffle-chart