24小时热门版块排行榜    

查看: 7204  |  回复: 24
本帖产生 1 个 数学EPI ,点击这里进行查看
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

zgchen9

金虫 (小有名气)

[求助] 请问如何求解二元一阶微分方程组

各位朋友新年好,我需要解一个二元一阶微分方程组,但是本人数学水平有限,特请交各位朋友。
A,B,C,D,E,F,K为常数,x 和y为t 的函数。dx/dt和dy/dt为导数,二元一阶微分方程组如下:
dx/dt=Ax+By+C
dy/dt=Dx+Ey+F
边界条件为t=0时,x=y=K.


请问如何得到x 和y. 谢谢。

方程组
回复此楼

» 猜你喜欢

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

一份耕耘,一份收获
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

soliton923

铁杆木虫 (职业作家)

数学村村长

看图吧,希望对你有用


soliton;sato-theory;algebre-geometry;Random-Matrices-Theory; Riemann-Hilbert method
3楼2012-01-02 22:29:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 25 个回答

一山

铁杆木虫 (正式写手)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
soliton923(金币+2): 谢谢参与讨论~~~ 2012-01-02 22:31:57
zgchen9(金币+5): ★★★很有帮助 2012-01-02 22:34:49
zgchen9(金币+5): ★★★很有帮助 2012-01-02 22:35:21
zgchen9(金币+5): ★★★很有帮助 2012-01-05 20:58:34
用mathematica软件可以求解:
DSolve[{x'[t] == A x[t] + B y[t] + C, y'[t] == D x[t] + E y[t] + F,
   x[0] == K, y[0] == K}, {x, y}, t] // Simplify

答案是:

x -> Function[{t}, (2 E^(-(1/
         2) (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) (-2 B C D E^(
          1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
         2 B C D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
         2 B C D E^(
          Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) -
         A C E^(1 + Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
         C E^(2 + Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
         A C E^(1 + 1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) -
          C E^(2 + 1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) -
         2 B C D E^(
          1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
         A C E^(1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) -
         C E^(2 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) -
         A C E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
         C E^(2 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
         C E^(1 + Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] +
         C E^(1 + 1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t)
           Sqrt[A^2 + 4 B D - 2 A E + E^2] -
         C E^(1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] -
         C E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] +
         A B E^(1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
         A B E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
         A B E^(Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
         B E^(1 + Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F +
         B E^(1 + 1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F +
         
         A B E^(1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F +
         B E^(1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
         B E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
         B E^(1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] F +
         B E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] F -
         B E^(Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] F +
         B E^(1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] F +
         A B D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
         2 B^2 D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
         A B D E^(
          1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
         2 B^2 D E^(
          1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
         A^2 E^(1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
         2 A B E^(
          1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
         B D E^(1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
         A E^(2 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
         A^2 E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
         2 A B E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
          B D E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
         A E^(2 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
         B D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] K +
         B D E^(1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] K -
         A E^(1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] K -
         A E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
          A^2 + 4 B D - 2 A E + E^2] K))/(Sqrt[
       A^2 + 4 B D - 2 A E +
        E^2] (-A - E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) (A + E + Sqrt[
         A^2 + 4 B D - 2 A E + E^2]))],
  y -> Function[{t}, -(2 E^(-(1/
          2) (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) (-A C D E^(
           1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
          A C D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
          A C D E^(
           Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
          C D E^(1 + Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) -
         
          C D E^(1 +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) -
          A C D E^(
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) -
          C D E^(1 +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
          C D E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) +
          C D E^(1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t)
            Sqrt[A^2 + 4 B D - 2 A E + E^2] -
          C D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] +
          C D E^(Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] -
          C D E^(1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] +
          A^2 E^(1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F +
          2 B D E^(1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t)
            F -
          A^2 E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
          2 B D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
          A^2 E^(Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
          2 B D E^(
           Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F +
          A E^(1 + Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
          A E^(1 + 1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t)
            F + A^2 E^(
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F +
          2 B D E^(
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
          A E^(1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F +
          A E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) F -
          A E^(1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] F +
          A E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] F -
          A E^(Sqrt[A^2 + 4 B D - 2 A E + E^2] t +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] F +
          A E^(1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] F +
          A B D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
          2 B D^2 E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
          A B D E^(
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
          2 B D^2 E^(
           1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
          A^2 E^(1 +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
          2 A D E^(
           1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
          B D E^(1 +
            1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
          A E^(2 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
          A^2 E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
          2 A D E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t)
            K - B D E^(
           1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K +
          A E^(2 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) K -
          B D E^((A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] K -
          B D E^(1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] K +
          A E^(1 + 1/2 (A + E - Sqrt[A^2 + 4 B D - 2 A E + E^2]) t +
            1/2 (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] K +
         
          A E^(1 + (A + E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) t) Sqrt[
           A^2 + 4 B D - 2 A E + E^2] K))/(Sqrt[
        A^2 + 4 B D - 2 A E +
         E^2] (-A - E + Sqrt[A^2 + 4 B D - 2 A E + E^2]) (A + E +
          Sqrt[A^2 + 4 B D - 2 A E + E^2]))]}}
忽悠王之俗家弟子
2楼2012-01-02 22:28:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lilac_c

至尊木虫 (知名作家)

【答案】应助回帖

感谢参与,应助指数 +1
zgchen9(金币+2): 有帮助 2012-01-03 19:56:55
我们一般不直接求出解析解,太难了.

 都采用数值格式求解

离散,.......龙格库塔
我生活在一个经常爆发地震的年代
4楼2012-01-03 09:49:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lilac_c

至尊木虫 (知名作家)

【答案】应助回帖


soliton923(金币+1): 谢谢参与讨论~~~ 2012-01-04 22:20:52
dx/dt=Ax+By+C
dy/dt=Dx+Ey+F

基于 crank-Nicloson格式的求解程序编写思路

第一步
显示求解出 当前的x(n+1)与y(n+1)
以第一个方程为例:
x(n+1)=x(n)+dt*( A*x(n)+B*y(n)+C)

第二部校正开始
由于用显格式求解误差会越来越大,故此,要用
x(n+1)=x(n)+dt*( A/2*(x(n)+x(n+1))+B*(y(n)+y(n+1))/2. +c)
当两次求解误差在设置的误差范围内,结束迭代过程,否则,重新回到校正.

.................
我生活在一个经常爆发地震的年代
6楼2012-01-03 21:12:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 323求调剂 +6 洼小桶 2026-03-18 6/300 2026-03-23 00:29 by king123!
[考研] 一志愿北京化工大学 070300 学硕 336分 求调剂 +4 vv迷 2026-03-22 4/200 2026-03-22 23:29 by king123!
[考研] 一志愿上海交大生物与医药专硕324分,求调剂 +3 jiajunX 2026-03-22 3/150 2026-03-22 19:32 by brblmd
[考研] 寻找调剂 +4 倔强芒? 2026-03-21 4/200 2026-03-22 16:14 by 木托莫露露
[考研] 289求调剂 +7 怀瑾握瑜l 2026-03-20 7/350 2026-03-22 15:57 by ColorlessPI
[考研] 298求调剂一志愿211 +3 上岸6666@ 2026-03-20 3/150 2026-03-22 15:50 by ColorlessPI
[考研] 285求调剂 +6 ytter 2026-03-22 6/300 2026-03-22 12:09 by 星空星月
[考研] 0805 316求调剂 +3 大雪深藏 2026-03-18 3/150 2026-03-21 18:55 by 学员8dgXkO
[考研] 材料工程专硕 348分求调剂 +3 冬辞. 2026-03-17 5/250 2026-03-21 18:47 by 学员8dgXkO
[考研] 一志愿重庆大学085700资源与环境总分308求调剂 +7 墨墨漠 2026-03-20 7/350 2026-03-21 16:36 by barlinike
[考研] 求调剂 +3 .m.. 2026-03-21 4/200 2026-03-21 16:25 by barlinike
[考研] 346求调剂[0856] +4 WayneLim327 2026-03-16 7/350 2026-03-21 04:02 by JourneyLucky
[考研] 一志愿华中科技大学,080502,354分求调剂 +5 守候夕阳CF 2026-03-18 5/250 2026-03-21 01:06 by JourneyLucky
[考研] 一志愿西南交通 专硕 材料355 本科双非 求调剂 +5 西南交通专材355 2026-03-19 5/250 2026-03-20 21:10 by JourneyLucky
[考研] 求调剂 +3 eation27 2026-03-20 3/150 2026-03-20 19:32 by JourneyLucky
[考研] 085410人工智能专硕317求调剂(0854都可以) +4 xbxudjdn 2026-03-18 4/200 2026-03-20 09:07 by 不168
[考研] 材料考研调剂 +3 xwt。 2026-03-19 3/150 2026-03-19 11:22 by w沐阳w
[考研] 材料,纺织,生物(0856、0710),化学招生啦 +3 Eember. 2026-03-17 9/450 2026-03-18 10:28 by Eember.
[考研] 考研求调剂 +3 橘颂. 2026-03-17 4/200 2026-03-17 21:43 by 有只狸奴
[考研] 有没有道铁/土木的想调剂南林,给自己招师弟中~ +3 TqlXswl 2026-03-16 7/350 2026-03-17 15:23 by TqlXswl
信息提示
请填处理意见