条形图4个变量

Question

我有一个关于R中条形图的问题。我有一个包含4个变量(月、年、位置和出生人数)的数据集，其中包含12个不同的月份、3个不同的年份和4个不同的位置。

Month Birth Year Location
Jan   3     2017  A
Feb   6     2017  A
Mar   8     2017  A
Apr   9     2017  A

是否可以创建一个包含4个图表(每个图表为期一年)的条形图，其中x轴=月份，y轴=出生，每个位置。分组或堆叠条形图对我来说是相同的。

非常感谢您提前给予的帮助！

Answer 1

您可以先使用ggplot2完成此操作，然后使用facet_grid或facet_wrap。

library(tidyverse)

data <- tibble(
  Month = rep(c("Jan", "Feb", "Mar"), 4),
  Birth = c(1:12),
  Year = c(rep("2017", 3), rep("2018", 3),rep("2017", 3), rep("2018", 3)),
  Location = c(rep("A", 6), rep("B", 6))
)

ggplot(data, aes(x = Month, y=Birth)) +
  geom_bar(stat='identity', position = 'stack', aes(fill = Location)) +
  facet_grid(~Year)

​

​

由reprex包创建于2021-04-28 (v0.3.0)