| 查看: 256 | 回复: 0 | |||
hxgxtu木虫 (小有名气)
|
[交流]
mathematica 运行问题
|
|
各位虫友,有使用mathematica的吗。 我试着写了一个求解线性方程组的语句,但是问题就在这,不管我怎么变换,第一次运算出来的结果不对,但再重新运行一下就出正确的结果,这是肿么个原因呢,贴出语句在下面,我用的是7.0纯英文版的。 注:每重新对M赋值一次都会是第一次运行数据不对,再运行才对 Clear[AA, BB, M] M = 2 AA = Array[a, {2 M + 1, 2 M + 1}] BB = Array[b, {2 M + 1}] Table[a[i, j] = 2*(j - M - 1)^(2*(i - 1))/(2*(i - 1))!, {i, 1, 2 M + 1}, {j, M + 2, 2 M + 1}] Table[a[i, j] = a[i - 1, M + 1 + j], {i, 2, 2 M + 1}, {j, 1, M}] Table[a[1, j] = 0, {j, 1, M}] a[1, M + 1] = 1 Table[a[i, M + 1] = 0, {i, 2, 2 M + 1}] Table[b = 0, {i, 1, 2 M + 1}] b[2] = -1 LinearSolve[AA, BB] 问题已经解决,呵呵,多谢各位劳神 [ Last edited by hxgxtu on 2011-12-8 at 21:24 ] |
» 猜你喜欢
体制内长辈说体制内绝大部分一辈子在底层,如同你们一样大部分普通教师忙且收入低
已经有10人回复
过年走亲戚时感受到了所开私家车的鄙视链
已经有9人回复
今年春晚有几个节目很不错,点赞!
已经有10人回复
情人节自我反思:在爱情中有过遗憾吗?
已经有10人回复
基金正文30页指的是报告正文还是整个申请书
已经有5人回复
找到一些相关的精华帖子,希望有用哦~
如何批量提取多个文件中第三列的部分数据并求和输出?
已经有21人回复
Mathematica迭代运算的终止条件怎么加进去
已经有7人回复
【求助】弱问下Mathematica里怎么运行*.nb文件
已经有6人回复
【求助】为什么明明是Sin[x]的,怎么经过运算运行之后变成了sin(x),搞的最后我无法对x
已经有4人回复
【求助】mathematica5.0运行问题,各位大师兄,帮忙啊
已经有3人回复
【分享】Mathematica 7.0.1.0 / 6.0.3.0 / 5.2.0.0 注册版 之 永不重装版 全套下载
已经有17人回复
【求助】如何提高Mathematica运行速度?
已经有6人回复
科研从小木虫开始,人人为我,我为人人













回复此楼
点击这里搜索更多相关资源