Re: [請益] 微方3.3第16題
試了很久還是試不出來>"<
NDSolve[{s'[x]==-0.2i[x]s[x],i'[x]==-0.7i[x]+0.2s[x]i[x],i[0]==8,s[0]==2}
,{i[x],s[x]},x]
答案還是無法算出來，會變成把後面兩個initial condition 代入前面再印出來>"<
請問該如何改呢?
※ 引述《thewindjuei (well...)》之銘言：
※ 引述《shinchen (starrydawn星晨)》之銘言：
: b小題到底要我們幹麼啊@@
: 不可能要手動解啊
: 但是我手邊的程式又不吃這種聯立方程式
: (應該說我不知道要怎麼說服程式s跟i是互相獨立的= =)
: 解答卻碰碰碰的就跑出函式圖形了
: 怎麼做出來的
: 有人知道嗎@@
參考下面網站
http://www.math.sjtu.edu.cn/Mathematica%E6%95%99%E7%A8%8B/6.1.1.htm
DSolve[{s'[t] == -0.2×s[t]×i[t], i'[t] == -0.7×i[t] + 0.2×s[t]×i[t],
i[0] == 8, s[0] == 2}, {i[t], s[t]}, t]
可是mathmatica說找不到符合此條件的解，
這是我輸入錯誤嗎？還是那邊出問題了呢？
歡迎多多討論~
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.169.87.229
→
10/30 13:18,
10/30 13:18
推
10/30 16:14,
10/30 16:14
推
10/30 19:05,
10/30 19:05
--
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.225.27
討論串 (同標題文章)