|
%I #5 Oct 15 2013 22:32:22
%S 1,2,3,4,5,6,7,8,9,14,15,16,17,18,19,28,29
%N Natural numbers n for which sum of decimal digits is not smaller than n/3.
%e Largest term is 29, 2+9>29/3=9.66
%t Select[Range[100],Total[IntegerDigits[#]]>=#/3&] (* _Harvey P. Dale_, Mar 10 2013 *)
%Y Cf. A092596-A092600.
%K base,nonn,fini,full
%O 1,2
%A _Labos Elemer_, Mar 18 2004
|
