A031490 Numbers whose base-8 representation has one fewer 0 than 7's.

7, 15, 23, 31, 39, 47, 55, 57, 58, 59, 60, 61, 62, 79, 87, 95, 103, 111, 119, 121, 122, 123, 124, 125, 126, 143, 151, 159, 167, 175, 183, 185, 186, 187, 188, 189, 190, 207, 215, 223, 231, 239, 247, 249, 250, 251, 252, 253, 254, 271

Offset

1,1

Links

Table of n, a(n) for n=1..50.

Mathematica

Select[Range[300], DigitCount[#, 8, 7]==DigitCount[#, 8, 0]+1&] (* Harvey P. Dale, Jan 22 2015 *)

Crossrefs

Cf. A007094.

Sequence in context: A337239 A043449 A136768 * A189754 A059562 A017149

Adjacent sequences: A031487 A031488 A031489 * A031491 A031492 A031493

Keyword

nonn,base

Author

Clark Kimberling

Status

approved