|
| |
|
| A242223型 |
| 最小素数p，使得H（n）==0（mod p），但H（k）==0mod p，对于no 0<k<n，或者如果不存在这样的素数p则为1，其中H（n。 |
|
3
|
|
|
|
1, 3, 11, 5, 137, 7, 1, 761, 7129, 61, 97, 13, 29, 1049, 41233, 17, 37, 19, 7440427, 11167027, 18858053, 23, 583859, 577, 109, 34395742267, 521, 375035183, 4990290163, 31, 2667653736673, 2917, 269, 3583, 397, 1297, 10839223, 199, 737281, 41
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
猜想：除了n=1,7外，a（n）是素数。
|
|
|
链接
|
Z.-W.孙，模素数本原根的新观察，arXiv预印本arXiv:1405.0290[math.NT]，2014。
|
|
|
例子
|
a（4）=5，因为H（4）=25/12==0（mod 5），但H（1）=1、H（2）=3/2和H（3）=11/6都不等于0模5。
|
|
|
数学
|
h[n_]：=分子[谐波数[n]]
f[n_]：=系数整数[h[n]]
p[n_]：=表[部分[部分[f[n]，k]，1]，{k，1，长度[f[n]]}]
执行[如果[h[n]<2，转到[cc]]；Do[Do[If[Mod[h[i]，Part[p[n]，k]]==0，Goto[aa]]，{i，1，n-1}]；打印[n，“”，部分[p[n]，k]]；转到[bb]；标签[aa]；继续，{k，1，长度[p[n]]}]；标签[cc]；打印[n，“”，1]；标签[bb]；继续，{n，1，40}]
|
|
|
交叉参考
|
囊性纤维变性。A000040型,A001008号,A002805号,A242169号,A242170型,A242171号,A242173号,A242174型,A242193型,A242194型,A242195型,A242207型,A242222型.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
状态
|
已批准
|
| |
|
|
