%I#10 2013年6月25日12:33:27

%S 1,1,1,3,1,1,3,1,3,5,1,46,1,5,66,1,1,3,3,10,3,1172,1398,5132，

%电话255,1336,41,1,3615,1462918283,1,1453,117131503311,1112，

%电话：13082272、17884812301、126861358、326513346、1

%N编号A226770（（质数（N））^2-1）。

%C a（n）=1 iff（素数（n））^2+素数（n）-1是素数（A053184）。

%H Peter J.C.Moses，<a href=“/A226856/b226856.txt”>n，a（n）表，n=1..400</a>

%t表[（div=Most[Divisors[n+1]]；长度[FixedPoint[Union[Flatten[AppendTo[div，Map[Most[Rest[Divisor[n+#]]&，#]]]和，div]]-1），{n，素数[Range[40]^2-1}]（*_Peter J.C.Moses_，Jun 20 2013*）

%Y参考A226770，A053184。

%K nonn公司

%O 1,4型

%2013年6月19日，A_Vladimir Shevelev

%E 2013年6月20日，P皮特·J·C·摩斯的更多条款