[求助]关于三维图形着色的问题

shylhust

<P><FONT face=楷体_GB2312 size=3>大概意思是这样，比如我有1000个小球每层画100个，但是没让每层的颜色不一样，该怎么办啊？我用corlormap，但是只显示最后一次的颜色把以前都覆盖了。请各位高手帮帮忙阿！论文集用，谢谢阿！</FONT></P>

shylhust

load fort0.dat<BR>load f:\co\fort.dat<BR>load X15<BR>load Y15<BR>load Z15<BR>a=fort0(:,1);<BR>b=fort0(:,2);<BR>c=fort0(:,3);<BR>x=fort(:,1);<BR>y=fort(:,2);<BR>z=fort(:,3)+1;<BR>axis([-2 52 -2 52 -2 52])<BR>grid off<BR>hold on<BR>for i=1:length(a)<BR>a1=a(i)+X15<BR>b1=b(i)+Y15<BR>c1=c(i)+Z15<BR>surf(a1,b1,c1)<BR>colormap([1 0 0])<BR>end<BR>shading interp<BR>hold on<BR>for j=1:length(x)<BR>x1=x(j)+X15<BR>y1=y(j)+Y15<BR>z1=z(j)+Z15<BR>surf(x1,y1,z1)<BR>colormap([0 1 0])<BR>end<BR>shading interp<BR>axis equal<BR>view(0,90)<BR>这是我的程序，fort和fort0时两个数据文件，各位高手多多指教阿！<BR>