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

回复此楼

» 猜你喜欢

拟解决的关键科学问题还要不要写已经有8人回复
最失望的一年已经有17人回复
为什么nbs上溴没有产物点出现呢已经有6人回复
求推荐博导已经有4人回复
存款400万可以在学校里躺平吗已经有34人回复
求助一下有机合成大神已经有4人回复
求推荐英文EI期刊已经有5人回复
26申博已经有3人回复
基金委咋了？2026年的指南还没有出来？已经有10人回复
疑惑？已经有5人回复

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

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

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

mlm6701

新虫 (初入文坛)

顶一下

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

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

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

返回列表