|
|
A097142号 |
| 素数p<10^n,其中2是立方剩余(mod p)。 |
|
2
|
|
|
3, 16, 112, 818, 6367, 52299, 442972, 3840740, 33898001, 303369367, 2745366812, 25071938615
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
数学
|
f[p_]:=块[{k=2},而[k<p&&Mod[k^3,p]!=2,k++];如果[k==p,0,1]];c=1;k=2;Do[While[p=质数[k];p<10^n,如果[f[p]==1,c++];k++];打印[c],{n,5}]
|
|
交叉参考
|
|
|
关键字
|
更多,非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|