OFFSET
1,1
COMMENTS
There are 30 terms (a(30)=29106); the only prime is a(17)=21397.
MATHEMATICA
Select[Range[10000, Sqrt[10^9]], Length[Union[IntegerDigits[#]]] == 5 && Length[Union[IntegerDigits[#^2]]] == 9 &] (* T. D. Noe, Jan 18 2012 *)
CROSSREFS
KEYWORD
base,nonn,fini,full
AUTHOR
Zak Seidov, Jan 18 2012
STATUS
approved