login
A086011
Number of 3's in decimal expansion of n^2.
11
0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 2, 1, 2, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
OFFSET
0,57
LINKS
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
Cf. 0's A086008, 1's A086009, 2's A086010, 4's A086012, 5's A086013, 6's A086014, 7's A086015, 8's A086016, 9's A086017.
Cf. A269243 for the n^3 analog.
Sequence in context: A064391 A236470 A206589 * A124760 A077619 A376141
KEYWORD
base,nonn
AUTHOR
Jason Earls, Jul 07 2003
STATUS
approved