ggplot2 画 多个不同类型指标的时间序列

有时沿时间变化的多个指标是不可比的，这时就不应将数据画在同一坐标系内，一般可以画多个小图并上下按时间 轴对齐，facet_wrap() 可以做小图。 例如，考虑我国 2013-2017 年人均国内生产总值和人均可支配收入数据。
dinc <- data.frame( year = 2013:2017, `人均可支配收入` = c(18311, 20167, 21966, 23821, 25974), `人均国内生产总值` = c(43852, 47203, 50251, 53935, 59660)) dinc2 <- dinc %>%
gather(`人均可支配收入`, `人均国内生产总值`, key = " 指标", value = "value")
p <- ggplot(data = dinc2, mapping = aes( x = year, y = value)) p + geom_line() + geom_point() + facet_wrap(~ `指标`, ncol = 1, scales = "free_y") + l

ggplot2 画 多个不同类型指标的时间序列最先出现在Python成神之路。