带十进制数的华夫饼图

Question

当华夫饼图中的值 <1 时，它们将不会显示。

library(waffle)
wp<-waffle(c(10,25,25,1,0.05,0.5,30,7.5,0.95),
           rows=10,
           colors=c("#CC0000", "#006600", "#669999", "#00CCCC", 
                    "#660099", "#CC0066", "#FF9999", "#FF9900", "black"))

有没有办法使用 waffle 或 ggplot 将剩余的框用它们的比例值填充？例如每个单元格有多种颜色？

Answer 1

这就是重点。正如@camille 所说，华夫饼图的一点是每次完整观察有 1 个元素。

然而，您（或任何其他想要类似结果的人）可以做的是稍微重塑数据以反映它们自己的 "Others" 类别中的那些小观察：

parts <- c("A" = 10, "B" = 25, "C" = 25, "D" = 1, "G" = 30, "H" = 7.5, 
       "Others" = 0.95 + 0.05 + 0.5)
waffle(parts,
       rows=10,
       colors=c("#CC0000", "#006600", "#669999", "#00CCCC", 
                "#FF9999", "#FF9900", "blue"))

带十进制数的华夫饼图

Waffle plot with decimal numbers

r

ggplot2

waffle-chart