用matlab画等势面,求助大牛MATLAB画三维等势面

该楼层疑似违规已被系统折叠 隐藏此楼查看此楼

首先，我先描述一下我的问题，我得到了一个三维数组，数字代表了三维空间中的势能，我想把等势面画出来，也就是把势能相同的点连接起来形成面，问下有没有大牛会的，之前我用的contour可以画二维的，三维的真心不会了，我附上二维的程序还有球三维数组的程序，希望有好心人帮我，十分感谢！

function [U1,k]=cff(a)%二维等势面，可以实现%

x=5;y=5;

U1=[0 100 100 100 0

0 75 75 75 0

0 50 50 50 0

0 25 25 25 0

0 0 0 0 0];

U2=U1;maxt=1;k=0;

while(~(maxt<1e-3||k>100000))

k=k+1;

maxt=0;

for i=2:y-1,

for j=2:x-1,

U2(i,j)=U1(i,j)+a*(U1(i,j+1)+U1(i+1,j)+U2(i-1,j)+U2(i,j-1)-4*U1(i,j))/4;

t=abs(U2(i,j)-U1(i,j));

if(t>maxt) maxt=t;

end

end

end

U1=U2;

contour(U1);

grid on

end

end

function cff1(a)%三维的contour函数实现不了

x=5;y=5;z=5;

U1=[0 100 100 100 0

0 75 75 75 0

0 50 50 50 0

0 25 25 25 0

0 0 0 0 0];

C1=repmat(U1,[1,1,5]);

C2=C1;maxt=1;k=0;

while(~(maxt<1e-3||k>100000))

k=k+1;

maxt=0;

for i=2:y-1,

for j=2:x-1,

for m=2:z-1,

C2(i,j,m)=C1(i,j,m)+a*(C1(i,j+1,m)+C1(i+1,j,m)+C2(i-1,j,m)+C2(i,j-1,m)+C1(i,j,m+1)+C2(i,j,m-1)-6*C1(i,j,m))/6;

t=abs(C2(i,j,m)-C1(i,j,m));

if(t>maxt) maxt=t;

end

end

end

end

C1=C2

contour(C1);

grid on

end

end