第一个问题简单:
第二个问题涉及到解析几何,曲线绕指定曲面旋转,涉及大量公式,用一个分段函数解决,在次略,有兴趣私密
clc;
clear;
close
all
t
=-3:0.5:3;
x=t
y=x;
z=ones(size(x))*5;
figure,
plot3(
x,
y,
z
)
%
第一个图
t1
=
0:0.05:3;
th
=
0:0.1:2*pi+0.1;
X
=
sin(th.')*sqrt(2*t1.*t1);
Y
=
cos(th.')*sqrt(2*t1.*t1);
Z
=
ones(size(X))*5;
figure,
surf(X,
Y,
Z)
%
第二个图第一段函数
t2
=
-3:0.05:0;
th
=
0:0.1:2*pi+0.1-pi;
X
=
sin(th.')*sqrt(2*t1.*t1);
Y
=
cos(th.')*sqrt(2*t1.*t1);
Z
=
ones(size(X))*5;
hold
on
surf(X,
Y,
Z)%
第二个图第二段函数
hold
off