| 查看: 766 | 回复: 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]]],效果不好,而且好像不能加入“位于球体外”这个限制条件。 请问有加速的方法吗?谢谢大家。 |
» 猜你喜欢
材料考研调剂
已经有7人回复
270调剂
已经有7人回复
275学硕081000服从调剂到其他专业,保不住本专业了
已经有6人回复
0710生物学,325求调剂
已经有3人回复
296材料专硕求调剂
已经有5人回复
385分 生物学(071000)求调剂
已经有5人回复
377求调剂
已经有3人回复
【求调剂】新能源材料本科,一志愿211,初试321
已经有6人回复
316求调剂
已经有11人回复
321求调剂
已经有9人回复
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














回复此楼