| 查看: 993 | 回复: 5 | |||
[求助]
紧急求助已有2人参与
|
|
用 ode45解下面非线性方程组, clc clear syms A1 A2 A3 B1 B2 B3 x2 x3 x4 x5 x6 x7 pho1 pho2 pho3 mdot_in h_in T_a1 T_a2 T_a3 T_r1 T_r2 T_r3 alpha_o1 alpha_o2 alpha_o3 alpha_i1 alpha_i2 alpha_i3; a=[-2.8e-3,2.8e-3*pho1,0,0,0,0,0 2.8e-3*A1*(x2-x3)-2.8e-3, 2.8e-3*B1*(x2-x3), 2.8e-3*pho2,0,0,0,0 (2.8e-3*A2+2.8e-3*A1)*(x3-x4)-2.8e-3,2.8e-3*B1*(x3-x4),2.8e-3*B2*(x3-x4),2.8e-3*pho3,0,0,0 2.8e-3*(A1+A2+A3),2.8e-3*B1,2.8e-3*B2,2.8e-3*B3,0,0,0 0,0,0,0,2377,0,0 0,0,0,0,0,2377,0 0,0,0,0,0,0,2377]; c=[(mdot_in*(h_in-x2)+1.3*alpha_i1*(x5-T_r1));(mdot_in*(x2-x3)+1.3*alpha_i2*(x6-T_r2));(mdot_in*(x3-x4)+1.3*alpha_i3*(x7-T_r3));0;30.58*alpha_o1*(T_a3-x5)-1.3*alpha_i1*(x5-T_r1);30.58*alpha_o2*(T_a2-x6)-1.3*alpha_i2*(x6-T_r2);30.58*alpha_o3*(T_a1-x7)-1.3*alpha_i3*(x7-T_r3)]; bb=inv(a)*c; 用传统的ode方法编写 即 dx(1)= (2500*((13*alpha_i1*(T_r1 - x(5)))/10 - mdot_in*(h_in - x(2)))*(B1*pho2*pho3 - B1*B2*pho3*x(2) + B1*B2*pho3*x(3) - B1*B3*pho2*x(3) + B1*B3*pho2*x(4) - B1*B2*B3*x(3)^2 + B1*B2*B3*x(2)*x(3) - B1*B2*B3*x(2)*x(4) + B1*B2*B3*x(3)*x(4)))/(7*(B1*pho2*pho3 + B2*pho1*pho3 + B3*pho1*pho2 - B1*B2*pho3*x(2) + B1*B2*pho3*x(3) - B1*B3*pho2*x(3) - B2*B3*pho1*x(3) + B1*B3*pho2*x(4) + B2*B3*pho1*x(4) + A1*pho1*pho2*pho3 + A2*pho1*pho2*pho3 + A3*pho1*pho2*pho3 - B1*B2*B3*x(3)^2 + B1*B2*B3*x(2)*x(3) - B1*B2*B3*x(2)*x(4) + B1*B2*B3*x(3)*x(4) - A1*B2*pho1*pho3*x(2) + A1*B2*pho1*pho3*x(3) - A1*B3*pho1*pho2*x(3) + A1*B3*pho1*pho2*x(4) - A2*B3*pho1*pho2*x(3) + A2*B3*pho1*pho2*x(4) - A1*B2*B3*pho1*x(3)^2 + A1*B2*B3*pho1*x(2)*x(3) - A1*B2*B3*pho1*x(2)*x(4) + A1*B2*B3*pho1*x(3)*x(4))) + (2500*((13*alpha_i2*(T_r2 - x(6)))/10 - mdot_in*(x(2) - x(3)))*(B2*pho1*pho3 - B2*B3*pho1*x(3) + B2*B3*pho1*x(4)))/(7*(B1*pho2*pho3 + B2*pho1*pho3 + B3*pho1*pho2 - B1*B2*pho3*x(2) + B1*B2*pho3*x(3) - B1*B3*pho2*x(3)- B2*B3*pho1*x(3) + B1*B3*pho2*x(4) + B2*B3*pho1*x(4) + A1*pho1*pho2*pho3 + A2*pho1*pho2*pho3 + A3*pho1*pho2*pho3 - B1*B2*B3*x(3)^2 + B1*B2*B3*x(2)*x(3) - B1*B2*B3*x(2)*x(4) + B1*B2*B3*x(3)*x(4) - A1*B2*pho1*pho3*x(2) + A1*B2*pho1*pho3*x(3) - A1*B3*pho1*pho2*x(3) + A1*B3*pho1*pho2*x(4) - A2*B3*pho1*pho2*x(3) + A2*B3*pho1*pho2*x(4) - A1*B2*B3*pho1*x(3)^2 + A1*B2*B3*pho1*x(2)*x(3) - A1*B2*B3*pho1*x(2)*x(4) + A1*B2*B3*pho1*x(3)*x(4))) + (2500*B3*pho1*pho2*((13*alpha_i3*(T_r3 - x(7)))/10 - mdot_in*(x(3) - x(4))))/(7*(B1*pho2*pho3 + B2*pho1*pho3 + B3*pho1*pho2 - B1*B2*pho3*x(2) + B1*B2*pho3*x(3) - B1*B3*pho2*x(3) - B2*B3*pho1*x(3) + B1*B3*pho2*x(4) + B2*B3*pho1*x(4) + A1*pho1*pho2*pho3 + A2*pho1*pho2*pho3 + A3*pho1*pho2*pho3 - B1*B2*B3*x(3)^2 + B1*B2*B3*x(2)*x(3) - B1*B2*B3*x(2)*x(4) + B1*B2*B3*x(3)*x(4) - A1*B2*pho1*pho3*x(2) + A1*B2*pho1*pho3*x(3) - A1*B3*pho1*pho2*x(3) + A1*B3*pho1*pho2*x(4) - A2*B3*pho1*pho2*x(3) + A2*B3*pho1*pho2*x(4) - A1*B2*B3*pho1*x(3)^2 + A1*B2*B3*pho1*x(2)*x(3) - A1*B2*B3*pho1*x(2)*x(4) + A1*B2*B3*pho1*x(3)*x(4))); dx(2)= (2500*((13*alpha_i2*(T_r2 - x(6)))/10 - mdot_in*(x(2) - x(3)))*(B2*pho3 - B2*B3*x(3) + B2*B3*x(4)))/(7*(B1*pho2*pho3 + B2*pho1*pho3 + B3*pho1*pho2 - B1*B2*pho3*x(2) + B1*B2*pho3*x(3) - B1*B3*pho2*x(3) - B2*B3*pho1*x(3) + B1*B3*pho2*x(4) + B2*B3*pho1*x(4) + A1*pho1*pho2*pho3 + A2*pho1*pho2*pho3 + A3*pho1*pho2*pho3 - B1*B2*B3*x(3)^2 + B1*B2*B3*x(2)*x(3) - B1*B2*B3*x(2)*x(4) + B1*B2*B3*x(3)*x(4) - A1*B2*pho1*pho3*x(2) + A1*B2*pho1*pho3*x(3) - A1*B3*pho1*pho2*x(3) + A1*B3*pho1*pho2*x(4) - A2*B3*pho1*pho2*x(3) + A2*B3*pho1*pho2*x(4) - A1*B2*B3*pho1*x(3)^2 + A1*B2*B3*pho1*x(2)*x(3) - A1*B2*B3*pho1*x(2)*x(4) + A1*B2*B3*pho1*x(3)*x(4))) - (2500*((13*alpha_i1*(T_r1 - x(5)))/10 - mdot_in*(h_in - x(2)))*(B2*pho3 + B3*pho2 - B2*B3*x(3) + B2*B3*x(4) + A1*pho2*pho3 + A2*pho2*pho3 + A3*pho2*pho3 - A1*B2*pho3*x(2) + A1*B2*pho3*x(3) - A1*B3*pho2*x(3) + A1*B3*pho2*x(4) - A2*B3*pho2*x(3) + A2*B3*pho2*x(4) - A1*B2*B3*x(3)^2 + A1*B2*B3*x(2)*x(3) - A1*B2*B3*x(2)*x(4) + A1*B2*B3*x(3)*x(4)))/(7*(B1*pho2*pho3 + B2*pho1*pho3 + B3*pho1*pho2 - B1*B2*pho3*x(2) + B1*B2*pho3*x(3) - B1*B3*pho2*x(3) - B2*B3*pho1*x(3) + B1*B3*pho2*x(4) + B2*B3*pho1*x(4) + A1*pho1*pho2*pho3 + A2*pho1*pho2*pho3 + A3*pho1*pho2*pho3 - B1*B2*B3*x(3)^2 + B1*B2*B3*x(2)*x(3) - B1*B2*B3*x(2)*x(4) + B1*B2*B3*x(3)*x(4) - A1*B2*pho1*pho3*x(2) + A1*B2*pho1*pho3*x(3) - A1*B3*pho1*pho2*x(3) + A1*B3*pho1*pho2*x(4) - A2*B3*pho1*pho2*x(3) + A2*B3*pho1*pho2*x(4) - A1*B2*B3*pho1*x(3)^2 + A1*B2*B3*pho1*x(2)*x(3) - A1*B2*B3*pho1*x(2)*x(4) + A1*B2*B3*pho1*x(3)*x(4))) + (2500*B3*pho2*((13*alpha_i3*(T_r3 - x(7)))/10 - mdot_in*(x(3) - x(4))))/(7*(B1*pho2*pho3 + B2*pho1*pho3 + B3*pho1*pho2 - B1*B2*pho3*x(2) + B1*B2*pho3*x(3) - B1*B3*pho2*x(3) - B2*B3*pho1*x(3) + B1*B3*pho2*x(4) + B2*B3*pho1*x(4) + A1*pho1*pho2*pho3 + A2*pho1*pho2*pho3 + A3*pho1*pho2*pho3 - B1*B2*B3*x(3)^2 + B1*B2*B3*x(2)*x(3) - B1*B2*B3*x(2)*x(4) + B1*B2*B3*x(3)*x(4) - A1*B2*pho1*pho3*x(2) + A1*B2*pho1*pho3*x(3) - A1*B3*pho1*pho2*x(3) + A1*B3*pho1*pho2*x(4) - A2*B3*pho1*pho2*x(3) + A2*B3*pho1*pho2*x(4) - A1*B2*B3*pho1*x(3)^2 + A1*B2*B3*pho1*x(2)*x(3) - A1*B2*B3*pho1*x(2)*x(4) + A1*B2*B3*pho1*x(3)*x(4))); 不仅程序冗长,而且debug太麻烦!!! (主要是自己太笨,工作量太大),没其他好法子,所以希望大家给些好的方法,自己对ode45很多用法不太了解,谢谢大家了。 |
» 猜你喜欢
三甲基碘化亚砜的氧化反应
已经有4人回复
请问下大家为什么这个铃木偶联几乎不反应呢
已经有5人回复
请问有评职称,把科研教学业绩算分排序的高校吗
已经有5人回复
孩子确诊有中度注意力缺陷
已经有12人回复
2025冷门绝学什么时候出结果
已经有3人回复
天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入
已经有4人回复
康复大学泰山学者周祺惠团队招收博士研究生
已经有6人回复
AI论文写作工具:是科研加速器还是学术作弊器?
已经有3人回复
论文投稿,期刊推荐
已经有4人回复
硕士和导师闹得不愉快
已经有13人回复

天天进步啊
木虫 (著名写手)
- 应助: 87 (初中生)
- 金币: 6058.7
- 散金: 101
- 红花: 42
- 沙发: 9
- 帖子: 1793
- 在线: 1005.5小时
- 虫号: 3689648
- 注册: 2015-02-15
- 性别: GG
- 专业: 理论和计算化学

2楼2018-10-06 14:43:09

3楼2018-10-06 20:54:46

4楼2018-10-06 20:56:38
chendequan
铁虫 (小有名气)
- 应助: 152 (高中生)
- 金币: 918.6
- 红花: 17
- 帖子: 262
- 在线: 208.5小时
- 虫号: 994474
- 注册: 2010-04-11
- 专业: 结构工程

5楼2018-10-07 09:11:15
独孤神宇
版主 (知名作家)
- 应助: 490 (硕士)
- 贵宾: 0.008
- 金币: 31014.8
- 散金: 802
- 红花: 122
- 沙发: 1
- 帖子: 5600
- 在线: 855.5小时
- 虫号: 3522474
- 注册: 2014-11-06
- 性别: GG
- 专业: 机械动力学
- 管辖: 计算模拟

6楼2018-10-08 22:04:26














回复此楼
;