OFFSET
1,1
COMMENTS
a(21) > 10^14. - Giovanni Resta, Jul 27 2018
LINKS
Eric Weisstein's World of Mathematics, Square Number
MATHEMATICA
a[n_] := Module[{i = 1}, While[DigitCount[i^2][[8]] != n, i++ ]; i]; (* Sam Handler (sam_5_5_5_0(AT)yahoo.com), Aug 22 2006 *)
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Patrick De Geest, Mar 15 1999
EXTENSIONS
a(13)-a(16) from Jon E. Schoenfield, Jan 24 2009
a(17)-a(20) from Giovanni Resta, Jul 27 2018
STATUS
approved