r - 如何在 r 中绘制 3D 函数？

Question

这个问题在这里已经有了答案:





3d plot in R - Patch

(1 个回答)


7年前关闭。




我有一个 3D 函数 - 让我们说 De Jong 函数:

fdejong <- function (x, y) {
   return (x^2 + y^2)
}

我怎样才能在 3D 中绘制它的图？我想从维基百科中实现类似的效果:

Answer 1

尝试这个 :

fdejong <- function (x, y) {
   return (x^2 + y^2)
}


x <- seq(-10, 10, length= 30)
y <- x
z <- outer(x, y, fdejong)
z[is.na(z)] <- 1
op <- par(bg = "white")
persp(x, y, z, theta = 30, phi = 30, expand = 0.5, col = "lightblue")