OFFSET
1,1
COMMENTS
16 is in the sequence because it is a square and 61 (an anagram of 16) is a prime number.
1156 is in the sequence because it is a square and 6151 (an anagram of 1156) is a prime number.
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..10000
MATHEMATICA
aprQ[n_]:=Length[Select[Select[FromDigits/@Permutations[IntegerDigits[n]], IntegerLength[#] == IntegerLength[n]&], PrimeQ]]>0; Select[Range[110]^2, aprQ] (* Harvey P. Dale, Aug 20 2011 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Claudio Meller, Jun 20 2009
STATUS
approved