编辑

经核准的

<<数字理论`数字TheoryFunctions`表[PrimitiveRoot[（质数[n]）^3]，{n，2，100}]

检验过的

编辑

T.D.诺伊：我做到了。

提出

检验过的

T.D.诺伊：我认为你应该删除一些文本。

编辑

提出

PrimitiveRoot[Prime[范围[2，100]]^3](*哈维·P·戴尔2013年5月7日*）

经核准的

编辑

哈维·P·戴尔：因为PrimitiveRoot现在位于Mma的核心中，所以不再需要加载NumberTheory附加组件。假设这样做有用，应该如何指出这一点？

_阿图尔·贾辛斯基(图形软件包(自动变速箱)csl公司.pl公司),_,2007年1月29日

OEIS服务器: https://oeis.org/edit/global/339

（第n素数）^3的最小正本原根。

2, 2, 3, 2, 2, 3, 2, 5, 2, 3, 2, 6, 3, 5, 2, 2, 2, 2, 7, 5, 3, 2, 3, 5, 2, 5, 2, 6, 3, 3, 2, 3, 2, 2, 6, 5, 2, 5, 2, 2, 2, 19, 5, 2, 3, 2, 3, 2, 6, 3, 7, 7, 6, 3, 5, 2, 6, 5, 3, 3, 2, 5, 17, 10, 2, 3, 10, 2, 2, 3, 7, 6, 2, 2, 5, 2, 5, 3, 21, 2, 2, 7, 5, 15, 2, 3, 13, 2, 3, 2, 13, 3, 2, 7, 5, 2, 3, 2, 2

2,1

<<数字理论`NumberTheoryFunctions`表[PrimitiveRoot[（质数[n]）^3]，{n，2，100}]

囊性纤维变性。A001918号,A127807号,A127809号,127810年.

非n

Artur Jasinski（grafix（AT）csl.pl），2007年1月29日

经核准的