Plot 3D-Ebene (true regression Oberfläche)
Ich versuche zu simulieren, die einige Daten (x1-und x2 - my erklärende Variablen), berechnen y, die mithilfe einer angegebenen Funktion + Rauschen, und zeichnen Sie die daraus resultierenden Beobachtungen UND die wahre regression Oberfläche. Hier ist, was ich habe, so weit:
set.seed(1)
library(rgl)
# Simulate some data
x1 <- runif(50)
x2 <- runif(50)
y <- sin(x1)*x2+x1*x2 + rnorm(50, sd=0.3)
# 3D scatterplot of observations
plot3d(x1,x2,y, type="p", col="red", xlab="X1", ylab="X2", zlab="Y", site=5, lwd=15)
Ich bin mir jetzt nicht sicher, wie ich hinzufügen kann, die "wahre" regression Flugzeug. Ich bin im Grunde auf der Suche nach etwas wie Kurve() wo kann ich plug in meine (wahre) Modell der Formel.
Dank!
- Ich denke, diesen SO-thread die Ihnen helfen könnten.
- Vielleicht dieser von Interesse sein könnten, zu.
Du musst angemeldet sein, um einen Kommentar abzugeben.
Wenn Sie wollten, ein Flugzeug, Sie könnte verwenden
planes3d
.Seit Ihr Modell ist nicht linear, es ist kein Flugzeug: Sie können
surface3d
statt.spheres3d
, z.B.i <- 1; spheres3d(x1[i], x2[i], y[i], radius=1, alpha=.5)
.persp3d
undsurface3d
? sieht aus wie der letztere hatteadd=TRUE
standardmäßig.surface3d
ist entworfen, um eine Ergänzung zur bereits bestehenden Grundstücke währendpersp3d
ist entworfen, um die ersten Plotten Befehl.Entschuldigung: ( ich habe nicht gelesen das die Frage sehr carefllly und jetzt sehen, dass ich stürmte in Schätzung, wenn Sie wollte, um eine Darstellung der Wahrheit.)
Hier ist ein Ansatz zur Einschätzung, gefolgt von der Oberfläche zeichnen mit
loess
:unique
? Prost!