数学建模社区-数学中国

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

! u! j2 L( Q# f- A
0 A# p# q- c; r4 m7 e% f4 t
: M# @/ k" _( b( R- k/ [' B& j方程比较长就不截了，最后的效果是想画出（x,y,z）的三维曲线图，想要t能从0到15左右，但是电脑最多算到t=2就会崩溃。。。
& l- o, M$ ?  Q) l1 F



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