24小时热门版块排行榜    

Znn3bq.jpeg
查看: 7295  |  回复: 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的回帖

lilac_c

至尊木虫 (知名作家)

【答案】应助回帖

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

 都采用数值格式求解

离散,.......龙格库塔
我生活在一个经常爆发地震的年代
4楼2012-01-03 09:49:02
已阅   回复此楼   关注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的回帖

soliton923

铁杆木虫 (职业作家)

数学村村长

看图吧,希望对你有用


soliton;sato-theory;algebre-geometry;Random-Matrices-Theory; Riemann-Hilbert method
3楼2012-01-02 22:29:45
已阅   回复此楼   关注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的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 297工科,求调剂? +10 河南农业大学-能 2026-04-12 10/500 2026-04-12 22:44 by lbsjt
[考研] 考研求调剂 +5 子木呐 2026-04-12 5/250 2026-04-12 22:15 by paopaotu326
[考研] 290调剂生物0860 +27 哇哈哈,。 2026-04-11 30/1500 2026-04-12 21:40 by 学zh
[考研] 279学硕食品专业求调剂院校 20+4 孤独的狼爱吃羊 2026-04-12 17/850 2026-04-12 20:23 by bljnqdcc
[考研] 295分求调剂 +13 ?要上岸? 2026-04-10 13/650 2026-04-12 15:37 by laoshidan
[考研] 一志愿厦大0856,306求调剂 +15 Bblinging 2026-04-11 15/750 2026-04-11 22:53 by 314126402
[考研] 求调剂 +6 archer.. 2026-04-09 8/400 2026-04-11 10:55 by zhq0425
[考研] 300分求调剂 (085501机械专硕,本科扬大) +8 xu@841019 2026-04-11 8/400 2026-04-11 10:46 by qingpingzhu
[考研] 087100初试311求调剂 +4 任雅琴 2026-04-09 4/200 2026-04-11 10:33 by zhq0425
[考研] 346,工科求调剂 +3 moser233 2026-04-09 3/150 2026-04-11 10:04 by zhq0425
[考研] 311求调剂 +13 xyp想读书 2026-04-10 14/700 2026-04-11 09:41 by 猪会飞
[考研] 生物学求调剂 一志愿沪9,326分 +7 刘墨墨 2026-04-06 7/350 2026-04-10 08:11 by kangsm
[考研] 1U盾记得记得就 +9 sanjin020722 2026-04-08 10/500 2026-04-09 14:11 by 诗与自由
[考研] 328求调剂 +17 lftmya 2026-04-07 18/900 2026-04-09 08:05 by 5268321
[考研] 293分求调剂,外语为俄语 +7 加一一九 2026-04-07 10/500 2026-04-08 20:14 by yutian743
[考研] 338求调剂 +8 wxygxsaaaaa 2026-04-06 8/400 2026-04-08 06:58 by 无际的草原
[考研] 求调剂 +11 wwwwabcde 2026-04-07 11/550 2026-04-07 23:16 by JourneyLucky
[考研] 一志愿西南090202求调剂 +4 在线求有学上 2026-04-07 4/200 2026-04-07 19:47 by biomichael
[考研] 325 调剂 +6 QQ小虾 2026-04-07 6/300 2026-04-07 15:17 by Ccclqqq
[考研] 生物学学硕求调剂:351分一志愿南京师范大学生物学专业 +6 …~、王…~ 2026-04-06 7/350 2026-04-06 18:54 by macy2011
信息提示
请填处理意见