Question

我正在尝试在3D的某些点上绘制网格以制作某种景观。但是，实际上我在点阵线框功能方面存在一些问题。该函数不会显示所有顶点。无论如何，我不确定线框功能是否是实现此目的的最佳方法？基本上，我正在寻找一个映射Mathematica的ListPlot3D函数的函数。

library(lattice)

col1 <- c(1.02,1.00,1.02,1.01,1.00,1.00,1.00,1.01,1.00,0.99,1.01,0.98,0.99)
col2 <- c(1.00,0.99,1.00,1.01,0.98,0.99,1.00,1.01,1.02,0.99,1.00,1.01,1.00)
col3 <- c(0.98,0.99,0.99,0.99,1.00,1.00,1.00,1.00,1.00,1.01,1.01,1.01,1.02)

data <- data.frame(phen=col1,param1=col2,param2=col3)

wireframe(phen ~ param1 * param2,
          data=data,
          xlab="param1", 
          ylab="param2", 
          zlab="phen",shade = T,
          aspect = c(1, 0.2), 
          scales=list(arrows=FALSE))

然后，我的绘图丢失了以下数据点：

p1 <- c(1.02,1.00,0.98)
p2 <- c(1.00,0.98,1.00)
p3 <- c(1.00,1.02,1.00)
p4 <- c(0.99,1.00,1.02)

这些是数据框中的点，线框函数未绘制这些点。我不清楚，为什么不包括在内。

wireframe plot with missing points: The red dots are marking data that is actually existing in the data frame, BUT not in the plot

我完全没有想法了，这是怎么回事？

谢谢您的任何建议！

编辑：添加了情节

R-使用点阵线框绘制网格

0 个答案: