r: 3D-график поверхности

Question

Предполагая, что у меня есть кадр данных x, y, z, где x любые y - координаты, а z - высота. Как создать одеяло z над плоскостями x и y. Я попытался с помощью функции лёссовой создать одеяло

data.loess = loess(z~x*y,data =data.df) 
data.fit = expand.grid(list(x = seq(min(x),max(x),0.1), y = seq(min(y),max(y),0.1))) 
z = predict(data.loess, newdata =data.fit) 

Но прогнозируемое значение г не в согласованности с первоначальной высотой.

Функции, подобные scatterplot3d, дают мне только разбросанные точки, как мне получить поверхность с холмами и долиной?

Answer 1

Я понятия не имею, что фраза «не в согласованности с первоначальной высотой» средствами, но почему бы не посмотреть на:

persp(z) 

x = seq(1,10,0.1); y = seq(1,10,0.1) 
z= outer(x,y,"*") 
data =data.frame(x=rep(x, times=91), y=rep(y, each=91), z=c(z)) 
data.loess = loess(z~x*y,data =data) 
data.fit = expand.grid(list(x = seq(min(x),max(x),0.1), y = seq(min(y),max(y),0.1))) 
z = predict(data.loess, newdata =data.fit) 
persp(z)