A031495 Numbers whose base-9 representation has one fewer 0 than 8's.

8, 17, 26, 35, 44, 53, 62, 71, 73, 74, 75, 76, 77, 78, 79, 98, 107, 116, 125, 134, 143, 152, 154, 155, 156, 157, 158, 159, 160, 179, 188, 197, 206, 215, 224, 233, 235, 236, 237, 238, 239, 240, 241, 260, 269, 278, 287, 296, 305, 314

Offset

1,1

Links

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

Mathematica

Select[Range@400, (s=#; Differences[Count[IntegerDigits[s, 9], #]&/@{0, 8}]=={1})&] (* Giorgos Kalogeropoulos, Jul 04 2021 *)

Crossrefs

Cf. A007095.

Sequence in context: A305496 A338090 A043485 * A224829 A273188 A017257

Adjacent sequences: A031492 A031493 A031494 * A031496 A031497 A031498

Keyword

nonn,base

Author

Clark Kimberling

Status

approved