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

Question

我有一个包含4000行和3列的表A，其中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)))