OFFSET
1,1
EXAMPLE
887 is a term because it is prime and it is the sum of square 196 and its reverse 691.
MATHEMATICA
With[{nn=40}, Take[Union[Select[Table[n^2+FromDigits[Reverse[ IntegerDigits[ n^2]]], {n, 100nn}], PrimeQ]], nn]] (* Harvey P. Dale, Mar 01 2015 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Shyam Sunder Gupta, Jul 20 2002
STATUS
approved