login
Squares in A105720.
0

%I #2 Mar 30 2012 17:26:30

%S 36,169,247590225

%N Squares in A105720.

%e 36=6^2=A105720(3),

%e 169=13^2=A105720(6),

%e 247590225=15735^2=A105720(4072)

%e No more terms up to 35746494200563714=A105720(34769014).

%t a=5;Do[a=a-Prime[n]+Prime[2n+1]+Prime[2n+2];If[IntegerQ[Sqrt[a]],Print[{a,n+1 }]],{n,1,10^8}];

%Y Cf. A105720, A166619, A166620.

%K more,nonn,bref

%O 1,1

%A _Zak Seidov_, Oct 18 2009