24小时热门版块排行榜    

查看: 2336  |  回复: 5

supper17

新虫 (初入文坛)

[求助] matlab二阶微分方程求解程序

%已知二阶微分方程组,求解Mx’’+Kx=Qe
其中M,K均为6*6矩阵,x为6*1向量,每一个x代表一个位移,
希望求出每一个x关于t的曲线
%主程序
global k1 m
k1=[5.31645e9 0 0 -5.31645e9 0 0;
    0 319.4473e9 252.3634e9 0 -319.4473e9 252.3634e9;
    0 252.3634e9 265.8228e9 0 -252.3634e9 132.9114e9;
    -5.31645e9 0 0 5.31645e9 0 0;
    0 -319.4473e9 -252.3634e9 0 319.4473e9 319.4473e9;
    0 252.3634e9 132.9114e9 0  -252.3634e9 168.2423e9;];
m=[ 1.9333 0 0 0.9667 0 0;
    0 2.1543 0.48 0 0.7457 0.2836;
    0 0.48 0.1379 0 0.2836 -0.1034;
    0.9667 0 0 1.9333 0 0;
    0 0.7457 0.2836 0 2.1543 -0.48;
    0 -0.2836 -0.1034 0 -0.48 0.1379;];
y0=zeros(1,12);
[t,x]=ode45(@order2,[0 5],y0);
plot(t, x);%绘制t,q图形


%子程序
function sol=order2(t,x)
global k1 m
a=0.06*t^3;
B=[sin(a) cos(a) 0 0 0 0;
   -cos(a) sin(a) 0 0 0 0;
   0 0 1 0 0 0;
   0 0 0 sin(a) cos(a) 0;
   0 0 0 -cos(a) sin(a) 0;
   0 0 0 0 0 1;];
F=[-2.842*cos(a);-4.263*sin(a)+99.114;-1.648*sin(a)-55.614;
    -2.842*sin(a);-2.842*cos(a);1.123*sin(a)+15.66;];
M=B'*m*B;
K=B'*k1*B;
Qe=B'*F;
sol=zeros(12,1);

    sol(7:12)=x(1:6);

sol(1:6)=M\(Qe-K*x(7:12));
end

能够运行,但是结果是发散的,急,急,急
回复此楼

» 收录本帖的淘帖专辑推荐

机械科研经验专辑 科研资料

» 猜你喜欢

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

做最好的自己
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖置顶 ( 共有1个 )

huaijuliu

铁杆木虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
gordon2008: 回帖置顶 2012-05-23 14:00:41
ode45是可以求解的。
是否和初始值有关系。
是否需要减小时间步长。
是否程序正确,比如[A B]or [B A]。
2楼2012-05-20 06:23:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

ssttrroonngg

金虫 (正式写手)

引用回帖:
2楼: Originally posted by huaijuliu at 2012-05-20 06:23:52:
ode45是可以求解的。
是否和初始值有关系。
是否需要减小时间步长。
是否程序正确,比如or 。

解出的x的后半部分物理意义是加速度吗?
饿醒了接着睡
3楼2012-05-22 11:14:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

huaijuliu

铁杆木虫 (正式写手)

【答案】应助回帖

引用回帖:
3楼: Originally posted by ssttrroonngg at 2012-05-22 11:14:05:
解出的x的后半部分物理意义是加速度吗?

please check help ode45 in matlab help documentation
4楼2012-05-22 21:33:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

b07310221

新虫 (初入文坛)

【答案】应助回帖


gordon2008: 金币+1, 欢迎交流 2012-05-23 14:00:49
得出的x前六列表示位移,后面六列表示速度。
我也遇到这个问题了,貌似跟ode45这个函数有关系。
5楼2012-05-22 21:58:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cjsyrswf

铁虫 (小有名气)

楼主这个问题解决了吗,遇到了同样的问题?
6楼2013-03-24 09:47:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 supper17 的主题更新
信息提示
请填处理意见