A043421 Numbers having one 0 in base 8.
8, 16, 24, 32, 40, 48, 56, 65, 66, 67, 68, 69, 70, 71, 72, 80, 88, 96, 104, 112, 120, 129, 130, 131, 132, 133, 134, 135, 136, 144, 152, 160, 168, 176, 184, 193, 194, 195, 196, 197, 198, 199, 200, 208, 216, 224, 232, 240, 248, 257
Offset: 1
Crossrefs
Cf. A007094.
Programs
-
Mathematica
Select[Range[300],DigitCount[#,8,0]==1&] (* Harvey P. Dale, Jul 15 2014 *)