%I M4783#22 2015年3月15日18:51:44

%第11、29、31、41、43、53、61、71、79101103113127131137149151157181页，

%电话：191197211223229239241251271281293307313337379389401，

%电话：409421439443449457491521547571593601613631641647653673

%N第2类-素数（定义见A005109）。

%盖伊，《数论中未解决的问题》，A18。

%D N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。

%H R.J.Mathar，n的表格，n=1..13766的a（n）</a>

%t PrimeFactors[n_Integer]：=扁平[表[#[[1]]，{1}]&/@FactorInteger[n]]；

%t f[n_Integer]：=块[{m=n}，如果[m==0，m=1，而[IntegerQ[m/2]，m/=2]；

%t当[IntegerQ[m/3]，m/=3]]时；

%t应用[Times，PrimeFactors[m]-1]]；

%t ClassMinusNbr[n_]：=长度[NestWhileList[f，n，UnsameQ，All]]-3；

%t素数[Select[Range[122]，ClassMinusNbr[Prime[#]]==2&]]（*_Robert G.Wilson v_*）

%Y参见A005113、A056637、A005109、A005111、A005112、A081424、A081428、A08142、A081128、A08149、A081430。

%K nonn公司

%O 1,1号机组

%A _N.J.A.Sloane，西蒙·普劳夫_

%E由_Robert G.Wilson v_编辑和扩展，2003年3月20日

%E由R.J.Mathar_更正，2007年2月1日