用matlab画出来的蜗牛，神奇吧~

bbs 08-29-2012, 06:28 PM

代码:
程序

t = linspace(0, 2*pi, 512);

 [u,v] = meshgrid(t);

 a = -0.4; b = .5; c = .1;

n = 3;

x = (a*(1 - v/(2*pi)) .* (1+cos(u)) + c) .* cos(n*v);

 y = (a*(1 - v/(2*pi)) .* (1+cos(u)) + c) .* sin(n*v);

 z = b*v/(2*pi) + a*(1 - v/(2*pi)) .* sin(u);

 surf(x,y,z,y)

 axis off

axis equal

colormap(hsv(1024))

 shading interp

 material shiny

 lighting phong

 camlight('left', 'infinite')

view([-160 25])

这个帖子最后修改于: 08-29-2012, 06:29 PM by bbs.

http://blog.scun.net