R ggplot2 - geom_smooth mit Farbverlauf von einer dritten kontinuierlichen Variablen

Question

Gibt es eine Möglichkeit, eine geglättete Kurve (x = var1, y = var2) zu zeichnen und sie in Bezug auf eine dritte kontinuierliche Variable (z = var3) einzufärben? Ich verwende folgenden Code:

library(ggplot2) 

    x = runif(100,-20,20) 
    y = 2*x+x^2+rnorm(100,0,50) 
    z = 0.5*x+rnorm(100,0,2) 
    df = data.frame(x=x,y=y,z=z) 

    ggplot(data=df,aes(x=x,y=y))+geom_smooth(method='loess', aes(color=z),se=F) 

Die geglättete Linie ist jedoch immer noch blau.

Verwendung der internen Variablen „..Y ..“ statt var3 Farben der Linie in Bezug auf var2.

ggplot(data=df,aes(x=x,y=y))+geom_smooth(method='loess', aes(color=..y..),se=F) 

Gibt es eine andere interne Variable, die aufgerufen wird, um die Zeile in Bezug auf var3 einzufärben?

Ich bin in der Lage, die gewünschte Handlung mit geom_line zu erzeugen, aber ich mag es stattdessen geglättet haben.

Answer 1

Sie auf dem richtigen Weg ist mit geom_line, Sie müssen es nur auf bereits geglätteten Daten verwenden. Nehmen Sie Ihre Datenrahmen, wie oben, dann:

df$predict <- predict(loess(y~x, data = df)) 

ggplot(df, aes(x = x,y = predict)) + 
    geom_line(aes(colour = z)) 

Diese hässliche Ergebnisse erzeugen können, wenn Ihre x große Lücken aufweist; sie werden als flache Segmente zwischen den Punkten herauskommen. Es gibt Abhilfen für den von newdata= zu predict() Fütterung und es in einem zweiten Datenrahmen zu speichern, aber dann müssen Sie auch z für diese neuen x Werte neu zu berechnen.