如何在Ggplot中的一个图表上有两条线

Question

下面是示例数据。我的主要问题是，是否使用Ggplot，我可以在不使用pivot_wider的情况下绘制两个行业(11和22)的线条？我正在寻找一张显示两个行业就业情况的折线图。我可以做一个更大的轴心，但希望在这种情况下避免这种情况。

periodyear <- c(2019,2019,2019,2019,2019,2019,2020,2020,2020,2020,2020,2020,2019,2019,2019,2019,2019,2019,2020,2020,2020,2020,2020,2020)
period <- c(01,02,03,04,05,06,01,02,03,04,05,06,01,02,03,04,05,06,01,02,03,04,05,06)
indcode <- c(11,11,11,11,11,11,11,11,11,11,11,11,22,22,22,22,22,22,22,22,22,22,22,22)
employment <- c(1540,1550,1560,1555,1570,1575,1600,1605,1595,1608,1615,1640,895,900,905,910,920,925,930,940,955,940,945,920)

twoseries <- data.frame(periodyear,period,indcode,employment)

Answer 1

不确定这是否是您正在寻找的，因为没有必要pivot_longer任何东西。数据的格式已经很整洁了。

library(ggplot2)

twoseries %>% 
  ggplot(aes(x = periodyear, y = employment, group = indcode, color = as.factor(indcode))) + 
  geom_line() +
  labs(x = "Period Year", y = "Employment", color = "Industries")

这将返回

​

​

(简化版感谢Gregor Thomas)