OFFSET
1,1
EXAMPLE
The prime 3691 is in the list because 1369 = 37*37.
PROG
(PARI) rotr(a) = if(a<10, a, eval(Str(a%10, a\10)))
s=[]; forprime(n=2, 200000, if(issquare(rotr(n)), s=concat(s, n))); s
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Colin Barker, Jan 01 2014
STATUS
approved