OFFSET
1,1
COMMENTS
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..2000
MATHEMATICA
Select[Range[10000], Ceiling[Mean[IntegerDigits[#]]]==9&] (* Harvey P. Dale, Apr 25 2014 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Reinhard Zumkeller, May 27 2010
STATUS
approved