r - 来自 2D 矩阵的 3D 曲面图

Question

在 R 中使用 2d 矩阵，如何创建 3d 曲面图，其中列 = x，行 = y，值是 z 中的高度？

在下面的示例中，x 值为 1:5，y 值为 1:5，数字将代表 z 中的高度/值。

> m<-matrix(rnorm(25),nrow=5,ncol=5)
> m
             [,1]       [,2]       [,3]        [,4]       [,5]
[1,] -1.495513045  0.8000040 -1.1499261  1.65661138  0.8140510
[2,] -1.150018195 -0.7582933  0.8306922  0.16026908  0.3913198
[3,] -0.852609406  0.5525621  0.3585986 -0.45054768 -1.2259927
[4,] -0.001926297 -0.5857351  2.1518281  0.03192463  0.2065039
[5,] -1.641128610  0.4333973 -1.0616628 -0.92143426 -0.9598991

Answer 1

包rgl应该让你开始......

require(rgl)
#  open renderer
open3d()
#  plot surface
rgl.surface( 1:10 , 1:10 , runif(100))
#  Export to png
rgl.snapshot( "sample.png" , fmt="png", top=TRUE )

Answer 2

要获得包含 Z 值的 2D 矩阵的 3D 曲面图，请尝试：

require(plot3D)

persp3D(z = TheMatrix2D, theta = 120)

用于theta调整视角。使用我的数据，我得到以下图：