A173225 a(n) is the smallest nonnegative m such that average digit of m^2 is n.

0, 1, 145, 12, 2, 8, 24, 1667, 313, 3

Offset

0,3

Links

Table of n, a(n) for n=0..9.

Mathematica

Join[{0}, Flatten[Table[Select[Range[2000], Mean[IntegerDigits[#^2]] == n&, 1], {n, 9}]]] (* Harvey P. Dale, Feb 26 2012 *)

Crossrefs

Sequence in context: A003837 A013863 A371624 * A126843 A099648 A043652

Adjacent sequences: A173222 A173223 A173224 * A173226 A173227 A173228

Keyword

base,nonn,fini,full

Author

Zak Seidov, Nov 22 2010

Status

approved