R语言绘制waffle chart

R绘制waffle chart的小示例

library(waffle)
library(ggplot2)
library(dplyr)
# 创建数据集
df <- data.frame(group = LETTERS[1:5],
                 value = c(25, 16, 21, 15,23 ))

# 绘图
ggplot(df, aes(fill = group, values = value)) +
  geom_waffle(n_rows = 10, size = 0.33, colour = "white") +
  scale_fill_manual