R ggplot как наложить частичный график на полный график

Question

Есть ли способ наложения частичного графика сверху полного графика с использованием ggplot? У меня есть один линейный график с временным интервалом, например, 100 дней по оси X, и вам нужно добавить вторую строку, которая охватывает только последние 20 дней, с разным цветом; Я не хочу, чтобы вторая строка имела нулевые значения за первые 80 дней - нужно только строить ее за последние 20 дней - используя другой цвет. Каков наилучший способ сделать это?

Answer 1

Конечно, просто использовать два геометрии с различными подмножествами вашего data.frame (для простоты я использую полный ДФ и только один подмножество):

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")