A031485 Numbers whose base-7 representation has one fewer 0 than 6's.

6, 13, 20, 27, 34, 41, 43, 44, 45, 46, 47, 62, 69, 76, 83, 90, 92, 93, 94, 95, 96, 111, 118, 125, 132, 139, 141, 142, 143, 144, 145, 160, 167, 174, 181, 188, 190, 191, 192, 193, 194, 209, 216, 223, 230, 237, 239, 240, 241, 242, 243

Offset

1,1

Links

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

Mathematica

Select[Range[250], DigitCount[#, 7, 0]+1==DigitCount[#, 7, 6]&] (* Harvey P. Dale, Sep 07 2023 *)

Crossrefs

Cf. A007093.

Sequence in context: A356059 A337141 A043417 * A004919 A172330 A017053

Adjacent sequences: A031482 A031483 A031484 * A031486 A031487 A031488

Keyword

nonn,base

Author

Clark Kimberling

Status

approved