OFFSET
1,1
COMMENTS
MATHEMATICA
Select[Range[600], Ceiling[Mean[IntegerDigits[#]]]==2&] (* Harvey P. Dale, Aug 10 2012 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Reinhard Zumkeller, May 27 2010
STATUS
approved