R语言 具有两种不同几何体的面网格

1l5u6lss  于 2023-04-18  发布在  其他
关注(0)|答案(1)|浏览(114)

我正在尝试用一个密度(年龄)和一个marplot(性别)制作一个facet_grid。我的尝试没有给予想要的输出,基本上只是一个空图。有什么建议吗?

ggplot() +
  facet_grid(Loc~Group, scales="free_y", space = "free_y") +
  geom_density(data = Age, aes(x=Age)) +
  geom_col(data = Gender,aes(x=Loc ,y=n, fill=gender))

年龄:

> as.data.frame(head(Age))
                    Loc Age Group
1               Breast  57   Age
2                 Lung  60   Age
3                 Skin  66   Age
4                 Lung  69   Age
5                 Lung  54   Age
6               Uterus  48   Age

性别:

Loc gender  n  Group
1                 Anus female 18 Gender
2                 Anus   male 12 Gender
3                Vulva female 12 Gender
4               Vagina female  2 Gender
5              Stomach female 20 Gender
6              Stomach   male 62 Gender
guz6ccqo

guz6ccqo1#

您可以使用patchwork创建一个包含条形图和密度图的并排图,如下所示:

library(patchwork)
library(ggplot2)
p1 <- ggplot() +
  geom_col(data = Gender, aes(x=Loc ,y=n, fill=gender))

p2 <- ggplot() +
  geom_density(data = Age, aes(x=Age)) 

p1 + p2

创建于2023-04-10带有reprex v2.0.2

相关问题