什么是最简单的生成素数列表的函数?提出这样的功能并不难,例如:
foo[n_] := Block[{A = {}, p = 2},
While[p < n, A = Append[A, p]; p = NextPrime[p]];
A]
但是,这似乎过于困惑。我想做类似的事情
foo[n_] := Table[Prime[i], {i,2,???}]
在哪里 ???是
NextPrime[n,-1]
的索引。这可能吗? 最佳答案
例如
f[x_] := Prime[Range@PrimePi@x]
用法
Grid[Table[{x, f[x]}, {x, 13, 20}], Frame -> All]
关于wolfram-mathematica - Mathematica-生成最多豪华轿车的素数列表,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/11814011/