|
| |
|
| A072942号 |
| a（n）是最小的x，使得分圆多项式值Phi（d，x）是所有d除以n的素数。 |
|
1
|
|
|
|
3, 4, 3, 4, 12, 6, 3, 4, 3, 12, 20, 24687390, 3, 72, 62, 4, 20, 1102903830, 12, 58051620, 3, 1793172, 468, 1035844571580, 62, 882, 398, 75274140, 6, 81206805256038, 14, 1288005000, 78428, 93888, 37664, 24380304369772260, 432, 3300, 21962
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
一个等价的公式是，a（n）是最小的数x，使得x^n-1只因子到它的代数因子中。
还有更多的术语是已知的，特别是素数指数的术语。大规模复合n是最难找到的——仅256项就花了一个月的时间。请与作者联系，了解更多超出空白的术语。
2从未出现在序列中，因为Phi（1,2）=1是不可约但不是素数。
|
|
|
链接
|
|
|
|
例子
|
a（16）=4，因为4^16-1=3*5*17*257*65537是5个代数因子。
|
|
|
MAPLE公司
|
f： =proc（n）局部p，C，x，d；
C： =[seq（numtheory:-分圆（d，x），d=numtheori:-除数（n）减去{1}）]；
p： =1；
做
p： =下一素数（p）；
如果andmap（isprime，subs（x=p+1，C）），则返回p+1 fi
日期：
结束进程：
|
|
|
数学
|
Table[With[｛d=Divisitors@n｝，SelectFirst[范围[10^3]，AllTrue[环原子[d，#]，PrimeQ]&]]，｛n，11｝](*迈克尔·德弗利格2018年1月31日*）
|
|
|
黄体脂酮素
|
（PARI）对于（d=1,17，ds=除数（d）；print（“正在搜索d|”d“：”ds）；对于素数（p=2499999，okc=1；对于（c=2，长度（ds），如果（！isprime（subst（polcyclo（ds[c]），x，p+1）），okc=0；断裂）；如果（okc，对于（c=1，长度（ds），打印（“Phi（”ds[c]“，”p+1“）=”subst（polcyclo（ds[c'），x，p+1））；断裂））
（PARI）isok（n，x）={fordiv（n，d，if（！isprime（polcyclo（d，x）），return（0））；）；返回（1）；}
a（n）={my（x=2）；while（！isok（n，x），x++）；x；}\\米歇尔·马库斯2018年1月31日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
