r - 将 "Overall"组添加到facet_wrap (ggplot2)

标签 r ggplot2 markdown facet-grid

我的数据中有两组,A1 和 A2。每个组中大约有 50% 是男性,年龄分布大致呈正态。我想绘制每个组中按性别划分的年龄分布的直方图,以及按性别划分的总体年龄分布(也可能是无性别的分布?)。 age vs. density

有没有办法用facet_wrap来做到这一点?如果没有,有没有办法可以操纵我的数据(例如添加虚拟变量)并添加它?

最佳答案

假设你有:

library(tidyverse)
ggplot(iris, 
       aes(Sepal.Length, fill = Sepal.Width > 3)) + 
  geom_histogram() +
  facet_wrap(~Species)

enter image description here

您可以操纵数据以包含数据集的另一个副本,其中“物种”始终为“总计”。然后,geom_histogram 将使用与“total”对应的方面的完整数据集。

ggplot(iris %>%
         bind_rows(iris %>% mutate(Species = "total")), 
       aes(Sepal.Length, fill = Sepal.Width > 3)) + 
  geom_histogram() +
  # I want 'total' at the end
  facet_wrap(~fct_relevel(Species, "total", after = Inf), nrow = 1)

enter image description here

关于r - 将 "Overall"组添加到facet_wrap (ggplot2),我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/54523133/

相关文章:

r - 如何使 ragg::agg_png 设备与 ggsave 一起工作?

markdown - Jekyll Markdown 转换器转义标签

r - 如果日期相同或 +- 7 天且 ID 相同,则合并 2 行

r - 使用 opts 更改 ggplot2 中的 axis.line 不起作用。这个怎么做?

r - 关于计算描述数据上限的函数的建议

r - 如何在仍然限制 x 轴范围的同时更改 x 轴刻度?

php - Geshi 与 Markdown

markdown - 如何在 Stash 中链接多个 .MD 文件?

r - 如何访问 Rcpp::List 中向量的元素

r - 将交互式 Python Bokeh 图传输到 Shiny