тоже могу сделать. Я предпочел бы знать как.
ощьюscatterplot3d
в R я пытаюсь нарисовать красные линии от наблюдений до плоскости регрессии:
wh <- iris$Species != "setosa"
x <- iris$Sepal.Width[wh]
y <- iris$Sepal.Length[wh]
z <- iris$Petal.Width[wh]
df <- data.frame(x, y, z)
LM <- lm(y ~ x + z, df)
library(scatterplot3d)
G <- scatterplot3d(x, z, y, highlight.3d = FALSE, type = "p")
G$plane3d(LM, draw_polygon = TRUE, draw_lines = FALSE)
Чтобы получить 3D-эквивалент следующей картины:
В 2D я мог бы просто использоватьsegments
:
pred <- predict(model)
segments(x, y, x, pred, col = 2)
Но в 3D я запутался с координатами.