2016-10-19 2 views
0

R에 3D 산란 점을 만들고 회귀 평면을 추가하고 싶습니다. 나는 매우 유용 할 수있는 statmethods.net 웹 사이트의 코드를 살펴 보았다. 나는 내 자신의 데이터로 시험해 보았고 비행기는 나타나지 않았다.`scatterplot3d` : 3D 산포도에 회귀 평면을 추가 할 수 없습니다.

library(scatterplot3d) 
s3d <- scatterplot3d(Try$Visits, Try$Net.Spend, Try$Radio, pch=16, highlight.3d = TRUE, type = "h", main = "3D Scatterplot") 
fit <- lm(Try$Visits ~ Try$Net.Spend +Try$Radio) 
s3d$plane3d(fit) 

enter image description here

답변

1

나는 다음과 같은 재현 예제 문제를 재현 할 수 없습니다

set.seed(0) 
x <- runif(20) 
y <- runif(20) 
z <- 0.1 + 0.3 * x + 0.5 * y + rnorm(20, sd = 0.1) 
dat <- data.frame(x, y, z) 
rm(x,y,z) 

fit <- lm(z ~ x + y, data = dat) 
library(scatterplot3d) 
s3d <- scatterplot3d(dat$x, dat$y, dat$z, pch=16, highlight.3d = TRUE, type = "h", main = "3D Scatterplot") 
s3d$plane3d(fit) 

enter image description here

당신은 모델 수식에 $을 피해야한다. 대신 data 인수를 사용하십시오.

fit <- lm(Visits ~ Net.Spend + Radio, data = Try)