不平衡组的非绝对计数直方图

Non absolute counts histogram for imbalanced groups

目前,我可以创建情节:

通过使用:

df %>%
  ggplot(aes_string(age)) + 
  facet_wrap(~CUSTOMER_GROUP, scales="free") +
  geom_histogram(binwidth = 3) +
  scale_y_continuous(labels=percent) +
  theme_igray() +
  xlab("Age") +
  ylab("")

但是如您所见,这并未考虑合理的百分比值。是否有解决方案以获得更有用的情节? 请注意,我已经使用 scales="free"

编辑

或许,不用 .00

也可以更好地格式化比例尺

解决方案是结合两种方法:

scale_y_continuous(labels=percent) +

用于漂亮的可视化 ..count../sum(..count.. 实际百分比。

要在非标准评估模式下正确使用 aes_string "..count../......" 只需引用整个内容即可。