login
Sum of digits = 3 times number of digits.
6

%I #12 Sep 08 2022 08:45:03

%S 3,15,24,33,42,51,60,108,117,126,135,144,153,162,171,180,207,216,225,

%T 234,243,252,261,270,306,315,324,333,342,351,360,405,414,423,432,441,

%U 450,504,513,522,531,540,603,612,621,630,702,711,720,801,810,900,1029

%N Sum of digits = 3 times number of digits.

%e 126 is a term as the arithmetic mean of the digits is (1+2+6)/3 = 3.

%t Select[Range[1200],3IntegerLength[#]==Total[IntegerDigits[#]]&] (* _Harvey P. Dale_, Feb 04 2011 *)

%o (Magma) [ n: n in [1..1030] | &+Intseq(n) eq 3*#Intseq(n) ]; // _Bruno Berselli_, Jun 30 2011

%Y Cf. A061383-A061388, A061423-A061425.

%K nonn,base,easy

%O 1,1

%A _Amarnath Murthy_, May 03 2001

%E More terms from Larry Reeves (larryr(AT)acm.org), May 16 2001