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