【发布时间】:2021-07-26 20:06:13
【问题描述】:
我还没有找到适用于此的解决方案。我有一个类似于下面简单示例的数据集。我想制作一个条形图,在 x 轴上绘制 serial_no 并在 y 轴上绘制值,根据每个序列号的测试时间,条形填充不同的颜色(2019 年一种颜色,2019 年一种颜色2020)。绘制图表时,我希望先绘制所有 2019 年数据,然后绘制 2020 年数据,而不是按字母顺序绘制序列号,因此您会看到三个红色条形图,然后是三个蓝色条形图。我如何安排数据或图表来实现这一点?谢谢!
test_year <- c(2019, 2019, 2019, 2020, 2020, 2020)
serial_no <- c("a3", "a6", "a4", "a2", "a1", "a5")
value <- c(5, 4.5, 6, 3, 3.5, 6)
df <- data.frame(test_year, serial_no, value)
df %>% ggplot(aes(x = serial_no, y = value, fill = factor(test_year))) +
geom_col(color = "black")
【问题讨论】:
-
试试
+ facet_wrap(~ test_year)