matlab曲线绕轴旋转,求助，二维图像如何绕轴旋转成为三维图像

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

程序如下

gama &＃61; 2*pi/9;

h &＃61; 300;

Rr &＃61; 400;

Dr &＃61; 850;

R1 &＃61; h/(2*sin(gama/2));

theta1 &＃61; linspace(0,gama/8,10);

theta2 &＃61; linspace(gama/8,gama/4,10);

theta3 &＃61; linspace(gama/4,3*gama/8,10);

theta4 &＃61; linspace(3*gama/8,gama/2,10);

theta5 &＃61; linspace(gama/2,5*gama/8,10);

theta6 &＃61; linspace(5*gama/8,3*gama/4,10);

theta7 &＃61; linspace(3*gama/4,7*gama/8,10);

theta8 &＃61; linspace(7*gama/8,gama,10);

theta &＃61; [theta1 theta2 theta3 theta4 theta5 theta6 theta7 theta8];

Y1 &＃61; -80.9186*theta1.^3&＃43;279.4697*theta1.^2-153.9023*theta1&＃43;474.3163;

Y2 &＃61; -80.9186*(theta2-gama/8).^3&＃43;258.2853*(theta2-gama/8).^2-106.7218*(theta2-gama/8)&＃43;462.9603;

Y3 &＃61; -407.0496*(theta3-gama/4).^3&＃43;237.1009*(theta3-gama/4).^2-63.7437*(theta3-gama/4)&＃43;455.5382;

Y4 &＃61; 388.6254*(theta4-3*gama/8).^3&＃43;130.5355*(theta4-3*gama/8).^2-31.6614*(theta4-3*gama/8)&＃43;451.5106;

Y5 &＃61; -388.6254*(theta5-gama/2).^3&＃43;232.2774*(theta5-gama/2).^2&＃43;450.0000;

Y6 &＃61; 407.0496*(theta6-5*gama/8).^3&＃43;130.5355*(theta6-5*gama/8).^2&＃43;31.6614*(theta6-5*gama/8)&＃43;451.5106;

Y7 &＃61; 80.9186*(theta7-3*gama/4).^3&＃43;237.1009*(theta7-3*gama/4).^2&＃43;63.7437*(theta7-3*gama/4)&＃43;455.5382;

Y8 &＃61; 80.9186*(theta8-7*gama/8).^3&＃43;258.2853*(theta8-7*gama/8).^2&＃43;106.9743*(theta8-7*gama/8)&＃43;462.9603;

c1 &＃61; -R1.*(sin(gama-theta)&＃43;sin(theta));

c2 &＃61; R1.*(cos(gama-theta)-cos(theta));

c3 &＃61; -h^2*sin(theta)./(sin(gama-theta)&＃43;sin(theta))&＃43;h^2/2-...

R1^2*sin(gama).*(cos(gama-theta)-cos(theta))./(sin(gama-theta)&＃43;sin(theta));

c5 &＃61; h.*sin(theta)./(sin(gama-theta)&＃43;sin(theta));

YY4 &＃61; [Y4(1) Y4(2) Y4(3) Y4(4) Y4(5) Y4(6) Y4(7) Y4(8) Y4(9) ceil(Y4(10))];

Y11 &＃61; [Y1 Y2 Y3 YY4];

Y22 &＃61; [Y5 Y6 Y7 Y8];

Y &＃61;[Y11 Y22];

Z1 &＃61; -sqrt(Rr^2-(Y11-Dr).^2);

Z2 &＃61; sqrt(Rr^2-(Y22-Dr).^2);

Z &＃61; [Z1 Z2];

X &＃61; -c3./c1-h./c1.*Z-c2./c1.*Y;

R1 &＃61; h/(2*sin(gama/2));

Xc &＃61; 0;

Yc &＃61; R1*sin(gama)./(sin(gama-theta)&＃43;sin(theta));

Zc &＃61; h*sin(theta)./(sin(gama-theta)&＃43;sin(theta))-h/2;

r &＃61; sqrt((X-Xc).^2&＃43;(Y-Yc).^2&＃43;(Z-Zc).^2);

plot(theta,r)

谢谢各位大哥&＃xff0c;想要实现的就是将r绕theta轴进行旋转&＃xff0c;成为空间曲面