| 查看: 483 | 回复: 3 | ||
[求助]
用matlab求解积分问题
|
|
用matlab编了一段程序无法运行，是不是求积分语句不对能，求高手指点。 clear; clc; w=10.0*1e-9; syms Theta fid=fopen('Sw.dat','w'); E=30.0; for n=1:1:800; w=w+1*1e-9 wa=w; wb=w; ky=E*sin(Theta)*1.5156e6; ka=(E-60.0)*1.5156e6; kb=E*1.5156e6; qa=-sqrt(ka^2-ky^2); qb=sqrt(kb^2-ky^2); T1=[cos(qa*wa+Theta)/cos(-Theta),i*sin(qa*wa)/cos(-Theta);i*sin(qa*wa)/cos(-Theta),cos(qa*wa-Theta)/cos(-Theta)]; T2=[cos(qb*wb-Theta)/cos(Theta),i*sin(qb*wb)/cos(Theta);i*sin(qb*wb)/cos(Theta),cos(qb*wb+Theta)/cos(Theta)]; T=T2*T1*T2*T1*T2*T1*T2*T1*T2*T1*T2*T1*T2*T1*T2*T1*T2*T1*T2*T1*T2*T1*T2*T1; y=2.0*cos(Theta)/(T(2,2)*exp(-i*Theta)+T(1,1)*exp(i*Theta)-T(1,2)-T(2,1)); Trans=abs(y)^2; Tx=Trans*cos(Theta); fun=inline(eval(Tx)); Conduct=quad(fun,-0.49*pi,0.49*pi); x=[n,Conduct]; fprintf(fid,'%f %f\n',x); end fclose(fid); |
回复此楼» 猜你喜欢
回收溶剂求助
已经有7人回复
-
职称评审没过，求安慰
已经有40人回复
-
硝基苯如何除去
已经有3人回复
-
A期刊撤稿
已经有4人回复
-
垃圾破二本职称评审标准
已经有17人回复
-
投稿Elsevier的Neoplasia杂志，到最后选publishing options时页面空白，不能完成投稿
已经有22人回复
-
申请26博士
已经有5人回复
-
EST投稿状态问题
已经有7人回复
-
毕业后当辅导员了，天天各种学生超烦
已经有4人回复
-
求助文献
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 求高手解答Matlab求解微分方程的初始值和边界值问题
已经有5人回复
- 求Matlab高手解决线性方程组的迭代求解问题
已经有17人回复
- 如何用matlab求解矩阵系数的二阶微分方程
已经有13人回复
- matlab求解非线性方程组，错误提示怎么解决
已经有5人回复
- 由入门到精通--matlab求解高等数学问题课件
已经有100人回复
- 高手进来用matlab求解常微分方程，十分感谢！
已经有17人回复
- 求matlab求解一个方程组的问题
已经有6人回复
- 求高人指点用matlab求解非线性方程组，解决了追加100金币；
已经有11人回复
- 【求助】matlab求解一个简单的积分（急！！！）
已经有7人回复
- 【求助】积分微分方程matlab求解
已经有6人回复
- 【讨论】CFD软件是求解PDE的，matlab中也可以求解PDE
已经有6人回复
- 【求助】用matlab编过有限差分法的请进
已经有9人回复
枫桥夜过
木虫 (小有名气)
铁杆会员
- 应助: 0 (幼儿园)
- 金币: 2017.3
- 帖子: 187
- 在线: 59.2小时
- 虫号: 2121417
- 注册: 2012-11-12
- 性别: GG
- 专业: 岩土与基础工程
2楼2013-04-02 22:12:30
枫桥夜过
木虫 (小有名气)
铁杆会员
- 应助: 0 (幼儿园)
- 金币: 2017.3
- 帖子: 187
- 在线: 59.2小时
- 虫号: 2121417
- 注册: 2012-11-12
- 性别: GG
- 专业: 岩土与基础工程
3楼2013-04-02 22:19:41
枫桥夜过
木虫 (小有名气)
铁杆会员
- 应助: 0 (幼儿园)
- 金币: 2017.3
- 帖子: 187
- 在线: 59.2小时
- 虫号: 2121417
- 注册: 2012-11-12
- 性别: GG
- 专业: 岩土与基础工程
4楼2013-04-02 22:20:07