|
|
11, 29, 31, 41, 43, 53, 61, 71, 79, 101, 103, 113, 127, 131, 137, 149, 151, 157, 181, 191, 197, 211, 223, 229, 239, 241, 251, 271, 281, 293, 307, 313, 337, 379, 389, 401, 409, 421, 439, 443, 449, 457, 491, 521, 541, 547, 571, 593, 601, 613, 631, 641, 647, 653, 673
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,1
|
|
|
参考文献
|
R.K.Guy，《数论中未解决的问题》，A18。
N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。
|
|
|
链接
|
|
|
|
数学
|
PrimeFactors[n_Integer]：=扁平[表[#[[1]]，{1}]&/@FactorInteger[n]]；
f[n_Integer]：=块[{m=n}，如果[m==0，m=1，而[IntegerQ[m/2]，m/=2]；
而[IntegerQ[m/3]，m/=3]]；
应用[Times，PrimeFactors[m]-1]]；
ClassMinusNbr[n_]：=长度[NestWhileList[f，n，UnsameQ，All]]-3；
素数[Select[Range[122]，ClassMinusNbr[Prime[#]]==2&]](*罗伯特·威尔逊v*)
|
|
|
交叉参考
|
囊性纤维变性。A005113号,A056637美元,A005109号,A005111号,A005112号,A081424号,A081425号,A081426号,A081427号,A081428号,A081429号,A081430号.
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
|
