login
Primes which can be represented as the sum of a square and its reverse.
0

%I #6 Mar 01 2015 15:18:14

%S 2,101,887,1151,32423,33623,36263,38873,72617,73037,78887,79697,82727,

%T 87977,94049,96059,96269,99689,112031,114641,117281,119291,122921,

%U 126761,136463,178697,1186811,1239311,1374731,1537241,1604951,1615151

%N Primes which can be represented as the sum of a square and its reverse.

%e 887 is a term because it is prime and it is the sum of square 196 and its reverse 691.

%t With[{nn=40},Take[Union[Select[Table[n^2+FromDigits[Reverse[ IntegerDigits[ n^2]]],{n,100nn}],PrimeQ]],nn]] (* _Harvey P. Dale_, Mar 01 2015 *)

%K base,nonn

%O 1,1

%A _Shyam Sunder Gupta_, Jul 20 2002