R：操纵 csv 散点数据以绘制 3D 表面

Question

我确定以前有人问过这个问题。如果你能找到一个好的链接，我很乐意删除这个问题，但我对谷歌没有任何运气。

我想绘制一些 3D 数据，搜索总是让我回到 R（欢迎使用伟大/简单的替代方案）。

我有一个如下所示的 csv 文件...

x    y    value
0    0    4.35
0    1    4.23
0    2    4.24
1    0    4.34
1    1    4.23
1    2    4.22
2    0    4.34
2    1    4.22
2    2    4.22

网格中的所有点都存在且唯一，因此我不需要任何插值。

我可以这样读...

data <- read.table("mydata.csv", header=T, sep=",")

我发现了许多 3d 绘图函数：persp、线框、scatterplot3d、rgl/persp3d、rgl/surface。但是没有运气理解他们需要的格式。

我可以这样输出...

svg("chart.svg", width=4, height=4)
#plot function call(args??)
dev.off()

将我的数据重新排列并绘制为表面/高度图并输出到 SVG（非嵌入式栅格）的最短方法是什么？

Answer 1

怎么样？

my.data <- read.table(text= "x    y    value
0    0    4.35
0    1    4.23
0    2    4.24
1    0    4.34
1    1    4.23
1    2    4.22
2    0    4.34
2    1    4.22
2    2    4.22", header = TRUE)


library(lattice)
wireframe(value ~ x + y, data = my.data, screen = list(z = 70, x = -50))