A043457 Numbers having one 1 in base 9.
1, 9, 11, 12, 13, 14, 15, 16, 17, 19, 28, 37, 46, 55, 64, 73, 81, 83, 84, 85, 86, 87, 88, 89, 99, 101, 102, 103, 104, 105, 106, 107, 108, 110, 111, 112, 113, 114, 115, 116, 117, 119, 120, 121, 122, 123, 124, 125, 126, 128, 129, 130
Offset: 1
Crossrefs
Cf. A007095.
Programs
-
Mathematica
Select[Range[150],DigitCount[#,9,1]==1&] (* Harvey P. Dale, Aug 15 2011 *)