使用lattice:：wireframe（）打印直曲面

假设我要绘制以下数据帧：

df <- data.frame(expand.grid(1:10,1:10),rep(10,100))
colnames(df) <- c("x","y","z")

如何绘制给定的坐标？我认为这与必须缩放/调整z轴有关，因为线框内的自动缩放可能会因为所有z坐标相等而混淆

---

只需添加一个

zlim

参数

wireframe(z~x*y,df,colorkey=TRUE,drape=TRUE, zlim=c(0,20))

---

只需添加一个

zlim

参数

wireframe(z~x*y,df,colorkey=TRUE,drape=TRUE, zlim=c(0,20))

---

这是“帮助页面比例”部分的内容：“此参数最常用的用法是将arrows=FALSE，这会导致使用记号标记和标签，而不是绘制箭头（默认值）。”因此只需将其作为列表值添加到“比例”中即可：

wireframe(z~x*y,df,colorkey=TRUE,drape=TRUE,
          scales=list(arrows=FALSE), zlim=c(0,10.1))

当绘制的平面处于某个极端时，

线框

无法显示任何内容，如果不是错误，至少是“意外行为”。我怀疑你不会在真实数据中看到这一点。使用褶皱没有多大意义，因为整个数据平面显示在白色中点。（同样，如果你没有这个病态的例子，这可能不是问题。）

---

这是“帮助页面比例”部分的内容：“此参数最常用的用法是将arrows=FALSE，这会导致使用记号标记和标签，而不是绘制箭头（默认值）。”因此只需将其作为列表值添加到“比例”中即可：

wireframe(z~x*y,df,colorkey=TRUE,drape=TRUE,
          scales=list(arrows=FALSE), zlim=c(0,10.1))

当绘制的平面处于某个极端时，

线框

无法显示任何内容，如果不是错误，至少是“意外行为”。我怀疑你不会在真实数据中看到这一点。使用褶皱没有多大意义，因为整个数据平面显示在白色中点。（同样，如果你没有这个病态的例子，这可能不是问题。）

---

对不起，我不明白你的问题。“如何绘制给定坐标”是什么意思？我的意思是，我希望看到输入线框的数据（注意，我的示例中的绘图似乎是空的），对不起，我不理解您的问题。“如何绘制给定坐标”是什么意思？我的意思是，我希望看到输入线框的数据（请注意，我示例中的绘图似乎是空的）