数学建模社区-数学中国

标题: mathematica解微分方程再积分的问题 [打印本页]
作者: Kevin_Van    时间: 2014-4-19 17:59
标题: mathematica解微分方程再积分的问题
解出几个InterpolatingFunction 后面又用了数值积分，结果想画出图像就非常慢了，一张图画几十分钟，要是定义域大一点还会崩溃。。。想问一下有没有办法加快速度？（我试过改WorkingPrecision可是好像更慢了。。。）或者就算这么慢，能不能把数据一段一段慢慢算出来，然后最后整合到一起呢？; z* w+ a. u: r

; C/ {# N+ q2 T4 y+ Z! x3 ?8 _
3 D& v. w* H# p) x* O# G( D- v& r
9 f& s4 p. H- Y* [. {7 z; D9 r# l$ F* X" W: \6 n- V/ ~: E# e
方程比较长就不截了，最后的效果是想画出（x,y,z）的三维曲线图，想要t能从0到15左右，但是电脑最多算到t=2就会崩溃。。。* P; Q5 Z6 v& |4 I5 M




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5