mathematica一个算法如何实现其实很简单……就是求188?07069是偶数的所有情况并给出总个数,是三个数字我写出来了一种n = 0;For[i = 1,i < 1000,i++,If[PrimeQ[18800007069 + 100000 i],Print[18800007069 + 100000 i]; n++
来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/28 20:40:05
mathematica一个算法如何实现其实很简单……就是求188?07069是偶数的所有情况并给出总个数,是三个数字我写出来了一种n = 0;For[i = 1,i < 1000,i++,If[PrimeQ[18800007069 + 100000 i],Print[18800007069 + 100000 i]; n++
mathematica一个算法如何实现
其实很简单……就是求188?07069是偶数的所有情况并给出总个数,是三个数字
我写出来了一种
n = 0;
For[i = 1,i < 1000,i++,
If[PrimeQ[18800007069 + 100000 i],
Print[18800007069 + 100000 i]; n++
]
]
n
但是我对mathematica的函数了解不是太全,我想输出文本文件,请问这种算法怎么实现:
定义一个数组(集合,集……),每次返回素数判断布尔值为真的时候就把这个数加入这个集里面,最后输出n和这个集.
这个怎么实现呢?
mathematica一个算法如何实现其实很简单……就是求188?07069是偶数的所有情况并给出总个数,是三个数字我写出来了一种n = 0;For[i = 1,i < 1000,i++,If[PrimeQ[18800007069 + 100000 i],Print[18800007069 + 100000 i]; n++
ans = Select[18800007069 + 100000 Range[0, 999], PrimeQ];
Export["C:\\Users\\Administrator\\Desktop\\example.txt", ans]
like this?