R和rgl：使用points3d时范围内的奇怪行为

我一直在努力找到一种使用rgl显示3d点的正确方法。我尝试过使用

points3d

和

spheres3d

，但直到现在都没有成功。看看我做了什么：

require(rgl)
x = runif(10, 0, 1)
y = runif(10, 0, 1)
z = runif(10, 0, 100)
test<-data.frame(x=x, y=y, z=z)

points3d(test$x,test$y,test$z,col='red',size=3)
box3d()

但是，考虑到

x，y，z

中的值可以假定不同的精度值，我需要创建一些东西，将每个变量放在相同的刻度（？）

使用

点3d

时，是否有更好的方法避免缩放问题？我必须使用

points3d

或者

sphere3d

（而不是直接使用

plot3d

），因为我需要用曲面覆盖这些点

---

谢谢大家!

有一个

aspect3d

函数可用于指定相对比例

points3d(test$x,test$y,test$z,col='red',size=3)
box3d()

aspect3d(c(1,1,1))
axes3d()

points3d(test$x,test$y,test$z,col='red',size=3)
box3d()

aspect3d(c(1,1,1))
axes3d()