看看这是否符合你的要求:
θ=[0:0.101:π/ 2,3 *π/ 2:0.01:2 *π);
ρ=√cosθ));
(x, y) = pol2cart(θ,ρ);
x1 =真正的(x);
日元=实际(y);
x2 = (x1, x1);
y2 = (y1, y1);
z = 0(大小(x2));
数字
plot3 (x2, y2, z)
持有在
为th = (29:29:340)
p1 = plot3 (x2, y2, z,“b”)；
旋转(p1, [0 1 0], th)
结束
ρ= 2 *√(cos(θ));
(x, y) = pol2cart(θ,ρ);
x1 =真正的(x);
日元=实际(y);
x2 = (x1, x1);
y2 = (y1, y1);
为= (20:20:340)
p2 = plot3 (x2, y2, z,“r”)；
旋转(p2 [0 1 0], th)
结束
持有从
网格在
传奇((p1, p2),“b”，“一个”）
为了使它正常工作，需要做一些更改。
