OFFSET
1,2
COMMENTS
a(17) > 4*10^23. - Jon E. Schoenfield, Jan 04 2009
a(20) > 10^28. - Giovanni Resta, Jul 27 2018
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..19
MATHEMATICA
a[n_] := Block[{k=1}, While[DigitCount[k^2, 10, 1] != n, k++]; k^2]; Array[a, 7] (* Giovanni Resta, Jul 27 2018 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
a(13)-a(16) from Jon E. Schoenfield, Jan 05 2009
a(17) from Giovanni Resta, Jul 27 2018
STATUS
approved