| 查看: 692 | 回复: 3 | ||
| 【悬赏金币】回答本帖问题，作者chenye1717将赠送您 18 个金币 | ||
[求助]
【请教/求助】Mathematica中如何加速这个常规的三维For Loop语句？ 已有1人参与
|
||
|
mathematica中如何加速这个常规的三维for loop语句？ for[i = 1, i <= 1000, i++, for[j = 1, j <= 1000, j++, for[k = 1, k <= 1000, k++, if[x[]^2 + y[[j]]^2 + z[[k]]^2 >= r^2, funval[[i, j, k]]= g[x[], y[[j]], z[[k]]], funval[[i, j, k]]= 0.0]]]; 我的目标是将有一个在三维空间内（在球体外部，x[]^2 + y[[j]]^2 + z[[k]]^2 >= r^2）构造table （名为funval）存储g函数的离散值。因为g函数比较复杂，所以导致计算速度很慢。 尝试过outer[g, x[], y[[j]], z[[k]]]，效果不好，而且好像不能加入“位于球体外”这个限制条件。 请问有加速的方法吗？谢谢大家。  |
回复此楼» 猜你喜欢
参与限项
已经有3人回复
-
假如你的研究生提出不合理要求
已经有7人回复
-
实验室接单子
已经有4人回复
-
全日制（定向）博士
已经有4人回复
-
对氯苯硼酸纯化
已经有3人回复
-
求助:我三月中下旬出站，青基依托单位怎么办？
已经有12人回复
-
不自信的我
已经有12人回复
-
所感
已经有4人回复
-
要不要辞职读博？
已经有7人回复
-
北核录用
已经有3人回复
zyh700600
金虫 (小有名气)
- 应助: 47 (小学生)
- 金币: 9368.2
- 红花: 10
- 帖子: 266
- 在线: 137.1小时
- 虫号: 56711
- 注册: 2005-01-16
- 专业: 金融工程
2楼2022-09-10 09:47:41
zyh700600
金虫 (小有名气)
- 应助: 47 (小学生)
- 金币: 9368.2
- 红花: 10
- 帖子: 266
- 在线: 137.1小时
- 虫号: 56711
- 注册: 2005-01-16
- 专业: 金融工程
3楼2022-09-10 09:49:05
zyh700600
金虫 (小有名气)
- 应助: 47 (小学生)
- 金币: 9368.2
- 红花: 10
- 帖子: 266
- 在线: 137.1小时
- 虫号: 56711
- 注册: 2005-01-16
- 专业: 金融工程
4楼2022-09-13 10:09:10