数学建模社区-数学中国

标题: mathematica解微分方程再积分的问题 [打印本页]

作者: Kevin_Van    时间: 2014-4-19 17:59
标题: mathematica解微分方程再积分的问题
解出几个InterpolatingFunction 后面又用了数值积分,结果想画出图像就非常慢了,一张图画几十分钟,要是定义域大一点还会崩溃。。。想问一下有没有办法加快速度?(我试过改WorkingPrecision可是好像更慢了。。。)或者就算这么慢,能不能把数据一段一段慢慢算出来,然后最后整合到一起呢?
. B% i( E; b" @+ Y$ p! B) c' L$ x6 l% ?# m7 x4 C

  ~7 v2 Q3 S6 K( z3 k/ T# ^6 z& B# a" J0 W' G2 z7 z( }& ?  F

. @7 o# y: \6 f$ }2 l% {  j7 n方程比较长就不截了,最后的效果是想画出(x,y,z)的三维曲线图,想要t能从0到15左右,但是电脑最多算到t=2就会崩溃。。。" Z& R3 G2 u% Z& k) Z/ Y/ c





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