ggplot geom_line цветная линия по направлению

Question

Как добавить цвет шкалы в geom_line(), чтобы указать, что сегмент линии вверх/вниз - без предварительной обработки данных с изменением формы, dcast и созданием другой переменной?

library(data.table) 
library(ggplot2) 

my.data <- data.table(id = c(1,1,2,2,3,3,4,4), 
        loc = c("a","b","a","b","a","b","a","b"), 
        value = c(10.3,11.5,12.5,12.1,10.5,9.8,9.7,10.7)) 

p<-ggplot(my.data ,aes(x=loc,y=value,group=id)) + geom_line() 

Answer 1

Я сделаю

ggplot(my.data, aes(x=loc,y=value,group=id)) + 
    geom_line(aes(color=ave(value,id,FUN=diff)>=0))