完善资料让更多小伙伴认识你,还能领取20积分哦, 立即完善>
扫一扫,分享给好友
那位高手能帮我看看这个程序哪里出错了,最后一步积分积不出来,能帮我修改一下吗,非常感谢!
clc; clear; a=4.15.*(10).^-6; l=1.6.*(10).^-6; b=62.5.*(10).^-6; n1=1.4504; n2=1.4447; n3=1.4786; k=2.*pi./l; V=k.*a.*((n1.^2-n2.^2).^(1./2)); cn=((n1.*k).^2-(2.27645.*V-0.306.*V.^2-0.992)./a.^2).^(1./2); r=(cn.^2-n2.^2.*k.^2).^(1./2); ka=(n1.^2.*k.^2-cn.^2).^(1./2); ev=2; R=8; syms y; X20=(R.*10.^-3./(2.*k.^2.*n2.^2)).^(2./3).*(cn.^2+y.^2-k.^2.*n2.^2); X2a=(R.*10.^-3./(2.*k.^2.*n2.^2)).^(2./3).*(cn.^2+y.^2-k.^2.*n2.^2.*(1+2.*a./(R.*10.^-3))); X2b=(R.*10.^-3./(2.*k.^2.*n2.^2)).^(2./3).*(cn.^2+y.^2-k.^2.*n2.^2.*(1+2.*b./(R.*10.^-3))); X3b=(R.*10.^-3./(2.*k.^2.*n3.^2)).^(2./3).*(cn.^2+y.^2-k.^2.*n3.^2.*(1+2.*b./(R.*10.^-3))); X2=(2.*k.^2.*n2.^2./(R.*10.^-3)).^(2./3).*(-X2b); X3=(2.*k.^2.*n2.^2./(R.*10.^-3)).^(2./3).*(-X3b); Oy=2./3.*(-X2b).^(3./2)+pi./4; f=exp(-a.*(r.^2+y.^2).^(1/2))./(r.^2+y.^2).^(1/2).*1./pi.*(X20./3).^(1./2).*besseli(1./3,2./3.*X20.^(3./2))./(X2a./3).^(1./2)./(besselk(-1./3,2./3.*X2a.^(3./2))+besselk(1./3,2./3.*X2a.^(3./2))).*(X2).^(1/2).*(X3).^(1/2)./(X2.*(cos(Oy)).^2+X3.*(sin(Oy)).^2); J=quadl(@(t)subs(f,y,t),0,inf) |
|
相关推荐
4个回答
|
|
建议认真理清自己的思路 这样 看上去 你的代码太乱了。
|
|
|
|
计算积分的方法:
|
|
|
|
|
|
|
|
|
|
|
|
你正在撰写答案
如果你是对答案或其他答案精选点评或询问,请使用“评论”功能。
1737 浏览 1 评论
200圆!求助大佬给一份VSG并网和离网模式的simulink仿真
2014 浏览 0 评论
MATLAB(3)--矩阵的引用(sub2ind、ind2sub、reshape函数使用)
2835 浏览 0 评论
3169 浏览 0 评论
4107 浏览 1 评论
小黑屋| 手机版| Archiver| 电子发烧友 ( 湘ICP备2023018690号 )
GMT+8, 2024-11-29 02:41 , Processed in 0.665250 second(s), Total 83, Slave 65 queries .
Powered by 电子发烧友网
© 2015 bbs.elecfans.com
关注我们的微信
下载发烧友APP
电子发烧友观察
版权所有 © 湖南华秋数字科技有限公司
电子发烧友 (电路图) 湘公网安备 43011202000918 号 电信与信息服务业务经营许可证:合字B2-20210191 工商网监 湘ICP备2023018690号