24小时热门版块排行榜    

查看: 501  |  回复: 1

mlm6701

新虫 (初入文坛)

[求助] 如何用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
回复此楼

» 猜你喜欢

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

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

mlm6701

新虫 (初入文坛)

顶一下
2楼2014-07-14 18:30:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 mlm6701 的主题更新
信息提示
请填处理意见