24小时热门版块排行榜

返回列表

mlm6701

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 214.8
帖子: 8
在线: 37.7小时
虫号: 865887
注册: 2009-10-08
专业: 光学

[求助] 如何用matlab使下列积分图形绕y轴旋转为三维？

clear
p0=7;
p=12;
w1=30/pi;
w2=60/pi;
e=w2/w1;
g=p0/p;
hold on
for r=0:0.1:p+p0
   r1=r./p;
if r>=p-p0 & r<=p+p0
c0=acos((g.^2.*(1.0./2.0)+r1.^2.*(1.0./2.0)-1.0./2.0)./(g.*r1));
elseif r<p-p0
      c0=pi;
end
v=@(c0) p.*w1.*sqrt(r1.^2.*(e+1.0).^2+e.^2.*g.^2-e.*g.*r1.*cos(c0).*(e+1.0).*2.0);
z1=quad(v,-1*c0,c0);
plot(r,z1,'*')
grid on
end

回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:

1楼 2014-07-07 22:16:10

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

mlm6701

新虫 (初入文坛)

顶一下

2楼2014-07-14 18:30:48

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

相关版块跳转我要订阅楼主 mlm6701 的主题更新

返回列表