¿Cómo dibujar una cuadrícula tridimensional usando matlab?

El código de Matlab para dibujar una cuadrícula cúbica es el siguiente: m=3;n=3;h=3;

% ¿Definir la escala de los datos?

Hx=1; Hy=1;Hz=1;

H=(h-1)*m*n;

CN=m*n*h;

N =m*n;

[x,y,z]=meshgrid(0:Hx:(n-1)*Hx,0:Hy:(m-1) *Hy,0:Hz: (h-1)*Hz);

Cubo=reforma(1:N*h,m,n,h);

MN=2 *m*n-m-n;

X=zeros(CN,1);Y=X;Z=X;

for?i=1:m

para?j=1:n

para?k=1:h

X(Cubo(i,j,k))=x(i,j,k) ;

Y (Cubo(i,j,k))=y(i,j,k);

Z(Cubo(i,j,k))=z( i,j,k);

p>

end

end

end

enlaceN=0;

Img=sqrt(-1);

AA=zeros(H+h*MN,1); for?k=1:h-1

para?j=1:n

para? i=1:m

enlaceN=enlaceN+1;

AA(enlaceN)=Cubo(i, j,k)+Img*Cube(i,j,k+1 );

end

fin final

for?k=1:h

para?j=1:n-1

para?i=1:m

enlaceN=enlaceN+1;

AA (enlaceN)=Cubo(i,j,k)+Img*Cubo (i,j+1,k);

fin

fin

para ?j=1:n

for?i =1:m-1

enlaceN=enlaceN+1;

AA(enlaceN)=Cubo(i ,j,k)+Img*Cubo(i+1,j, k);

fin

fin

fin

figura;

plot3(X,Y,Z ,'r.')

%--plot?bond-----

eje?equal

P1=real(AA);P2= imag(AA);

línea([X(P1)';X(P2)'],[Y(P1)' ;Y(P2)'],[Z(P1)';Z (P2)'],'color','b')