OFFSET
1,1
COMMENTS
a(21) > 10^28. - Giovanni Resta, Jul 27 2018
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..20
FORMULA
a(n) = A048347(n)^2. - Max Alekseyev, Oct 20 2008
MATHEMATICA
a[n_] := Block[{k=1}, While[DigitCount[k^2, 10, 2] != n, k++]; k^2]; Array[a, 7] (* Giovanni Resta, Jul 27 2018 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
a(13)-a(15) from Max Alekseyev, Oct 20 2008, Nov 10 2008, Dec 05 2008
a(16)-a(18) from Jon E. Schoenfield, Dec 25 2008
STATUS
approved