丁羽珊 发表于 2011-8-20 22:03

matlab 跳动的红心

x = linspace(-2,2,100);%
= meshgrid(x,x,x);
I1 = (X.^2+9/4*Y.^2+Z.^2-1).^3-X.^2.*Z.^3-9/80*Y.^2.*Z.^3;
p = patch(isosurface(X,Y,Z,I1,0));
set(p, 'FaceColor', 'red', 'EdgeColor', 'none');
view(3);
axis equal ;
axis off;
light('Posi',);
lighting phong
set(gca,'nextplot','replacechildren');
XX = get(p,'XData');
YY = get(p,'YData');%
ZZ = get(p,'ZData');
for j = 1:20
bili = sin(pi*j/20);%i Love you !
set(p,'XData',bili*XX,'YData',bili*YY,'ZData',bili*ZZ)
F(j) = getframe;
end
movie(F,9)%9次跳动次数可以自行修改

蓝色琉璃 发表于 2011-8-21 08:20

....运行不出来。。。。

丁羽珊 发表于 2011-8-21 18:09

蓝色琉璃 发表于 2011-8-21 08:20 static/image/common/back.gif
....运行不出来。。。。

我都可以啊啊

mx03712468 发表于 2011-8-23 18:26

终于找到啦啊

zisuyingcao 发表于 2011-8-23 19:37

呵呵，先谢了哈      

zisuyingcao 发表于 2011-8-23 19:38

{:3_48:}                                                   

/yl独善其身 发表于 2011-8-25 21:27

这个帖子必须要顶

xuanwoxingxi 发表于 2011-8-26 22:11

恩 可以 运行 但是不太好看。。。

849577980 发表于 2011-9-5 20:52

要是能将方程改进一下，是中间部位更加光滑就完美了。。。。

pingxin 发表于 2011-9-11 18:07

{:soso_e179:}
不错~~~
页: [1] 2
查看完整版本: matlab 跳动的红心