使用plot3D对特定颜色的行进行着色

Question

我有一个包含4000个行和3列的表A，其中x看起来像

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色是黑色的等等，请问如何得到呢？

更新:谢谢农克荣的回答。我有以下代码工作：

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

Answer 1

与…有关的东西

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