login
A031495
Numbers whose base-9 representation has one fewer 0 than 8's.
0
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
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
KEYWORD
nonn,base
STATUS
approved