R ggplot如何覆盖整个图上的部分图形

Question

有没有办法用ggplot覆盖整个图上的部分图？我在X轴上有一个时间跨度为100天的线图，并且需要添加仅跨越最近20天的不同颜色的第二行;我不想在第80天将第二行绘制为零值 - 只需要在最近20天内绘制它们 - 使用不同的颜色。什么是最好的方式来做到这一点？

Answer 1

当然，仅仅使用两个geoms与data.frame的不同子集（为简单起见，我用的是全DF且只有一个子集）：

library(ggplot2) 
df <- data.frame(Index = 1:1000, Value = cumsum(rnorm(1000))) 
ggplot() + geom_line(data = df, aes(x = Index, y = Value)) + 
      geom_line(data = df[500:700,], aes(x = Index, y = Value), col="red")