scatterplot3d dla powierzchni odpowiedzi w R
Chcę wykreślić powierzchnię odpowiedzi poprzez scatterplot3d, ale następujący kod za pomocą błędu.
library(rsm)
swiss2.lm <- lm(Fertility ~ poly(Agriculture, Education, degree = 2), data = swiss)
persp(swiss2.lm, Education ~ Agriculture, zlab = "Fertility")
library(scatterplot3d)
s3d <-
scatterplot3d(
swiss
# , type = "h"
, highlight.3d = TRUE
, angle = 55
, scale.y = 0.7
, pch = 16
)
s3d$plane3d(swiss2.lm, lty.box = "solid")
Byłbym bardzo wdzięczny, jeśli pomożesz rozwiązać problem. Dzięki
Eidt
Error in segments(x, z1, x + y.max * yx.f, z2 + yz.f * y.max, lty = ltya, :
cannot mix zero-length and non-zero-length coordinates
używamswiss
dane zrsm
biblioteka.