OFFSET
1,2
MATHEMATICA
Select[Range[150], DigitCount[#, 9, 1]==1&] (* Harvey P. Dale, Aug 15 2011 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved