数学建模社区-数学中国
标题:
求助 mathmatica 多层循环
[打印本页]
作者:
dabaixiaocai
时间:
2013-1-19 18:41
标题:
求助 mathmatica 多层循环
函数f(x1,x2,x3,x4,x5),没一个变量都要实现从0到20的计算,然后求和,请大侠帮忙设计个循环程序。
作者:
linanisyugioh
时间:
2013-4-22 20:31
你只需要最后的和,还是说同时需要20×20×20×20×20个函数值以及最后这20×20×20×20×20的求和结果??
- L/ _" Y: s) [( }& z
如果只需要最后结果的话:
Fold[Plus, 0, Flatten[Table[f[x1, x2, x3, x4, x5], {x1, 0, 20}, {x2, 0, 20}, {x3, 0, 20}, {x4, 0, 20}, {x5, 0, 20}]]]
复制代码
就搞定了
* [ _7 J0 a, F: p- m. H- f9 _
如果你还想看看这20×20×20×20×20个函数值的话:
Flatten[Table[f[x1, x2, x3, x4, x5], {x1, 0, 20}, {x2, 0, 20}, {x3, 0, 20}, {x4, 0, 20}, {x5, 0, 20}]]
复制代码
理论上这样是可以实现的,不过鉴于20×20×20×20×20实在太大,可能你要运算很久都不一定能搞的出最后结果。
# I' K: r2 f c1 r3 k3 l; N. I
以上并没有用循环来实现你想要的功能,你如果非得想要用循环实现的话,那么你可以用DO函数来实现。mathematica有强大的帮助文档,不会用的话你可以去查查文档。
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5