使用 plot3D 以特定颜色为行着色

Question

我有一个 table A 有 4000 行和 3 列，其中 x y z 看起来像

x  y  z
1  3  6
2  4  6
3  5  6
5  2  5

我想用plot3D画出来

library(plot3D)
library(rgl)
plot3d(A)

但是，我想将第 1-1000 行设置为红色，将 2000-3000 行设置为黑色等。请问如何获取？

更新：感谢 nongkrong 的回答。我有以下代码工作：

plot3d(A,col=rep(1:4,each=1000))

Answer 1

类似

的内容

with(yourData, scatter3D(x, y, z, col=rep(1:4, each=1000)))