A061386 Sum of digits = 3 times number of digits.
3, 15, 24, 33, 42, 51, 60, 108, 117, 126, 135, 144, 153, 162, 171, 180, 207, 216, 225, 234, 243, 252, 261, 270, 306, 315, 324, 333, 342, 351, 360, 405, 414, 423, 432, 441, 450, 504, 513, 522, 531, 540, 603, 612, 621, 630, 702, 711, 720, 801, 810, 900, 1029
Offset: 1
Examples
126 is a term as the arithmetic mean of the digits is (1+2+6)/3 = 3.
Programs
-
Magma
[ n: n in [1..1030] | &+Intseq(n) eq 3*#Intseq(n) ]; // Bruno Berselli, Jun 30 2011
-
Mathematica
Select[Range[1200],3IntegerLength[#]==Total[IntegerDigits[#]]&] (* Harvey P. Dale, Feb 04 2011 *)
Extensions
More terms from Larry Reeves (larryr(AT)acm.org), May 16 2001