OFFSET
0,57
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
MATHEMATICA
DigitCount[(Range[0, 100])^2, 10, 3] (* G. C. Greubel, Dec 13 2016 *)
PROG
(PARI) A086011(n)=#select(d->d==3, digits(n^2)) \\ M. F. Hasler, Feb 21 2016
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Jason Earls, Jul 07 2003
STATUS
approved