我的样本数据:
结构(年份=年份(2018年,2018年,2018年,2018年,2019年,2019年), 月= c(9,10,11,12,1,2),pred1 = c(-6.63356483810535, -6.50968293287978,-1.54767782423655,-1 ….
这就是我理解你在y轴上想要年份的问题 - 我把它放在垂直方面,每个方面都有一个线图,x上有月份,y上有值。如果这不是您想要做的,请澄清您的原始问题。
ggplot(df1, aes(month)) + geom_line(aes(y = pred1), color = "blue") + geom_line(aes(y = pred2), color = "red") + facet_grid(year~.)
如果您希望图例区分这两个系列,最简单的方法是将数据重新整形为长格式,以便系列名称是一个可以映射到美学的变量,如颜色。
library(dplyr) df1 %>% tidyr::gather(series, value, pred1:pred2) %>% ggplot(aes(month, value, color = series)) + geom_line() + facet_grid(year~.)