ex4_18.m

源代码集合

X=0:.2:pi; R=exp(-X.^2/2).*sin(X);
plot(R,X), axis('square')
figure; [x,y,z]=cylinder(R,20);
surf(x,y,z*pi), axis([-0.6,0.6,-0.6,0.6,0,pi])