討論串[請益] 微方3.3第16題
共 5 篇文章
內容預覽:
剛剛又找了幾個網站以後用mathematica作圖出來了. 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, 0, 10}]. 其實差別
(還有341個字)
內容預覽:
http://www2.ee.ntu.edu.tw/~b95901189/DE/. 如果大家不介意就用我寫的小程式算吧.... 要留意的事項如下:. 1. 沒有檢查下限,所以s,i,r,n是否為負數都沒錯. 2. r的值 = n - s[t] - i[t]. 3. dt 為 每次代值取的間隔. 4.
(還有208個字)
內容預覽:
試了很久還是試不出來>"<. 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 代入前面再印出
(還有250個字)
內容預覽:
b小題到底要我們幹麼啊@@. 不可能要手動解啊. 但是我手邊的程式又不吃這種聯立方程式. (應該說我不知道要怎麼說服程式s跟i是互相獨立的= =). 解答卻碰碰碰的就跑出函式圖形了. 怎麼做出來的. 有人知道嗎@@. --. ╭─★─┬─╭─╮╭─╮╭─╮┐★┐┌─╮╭─╮╮★╭╭╮┐. ╰─╮ │
(還有107個字)