A043485 Numbers having one 8 in base 9.

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

Offset

1,1

Links

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

Mathematica

Select[Range[300], DigitCount[#, 9, 8]==1&] (* Harvey P. Dale, Jun 26 2011 *)

Prog

(PARI) isok(m) = #select(x->(x==8), digits(m, 9)) == 1; \\ Michel Marcus, Oct 13 2020

Crossrefs

Cf. A007095 (numbers in base 9), A338090.

Sequence in context: A277052 A305496 A338090 * A031495 A224829 A273188

Adjacent sequences: A043482 A043483 A043484 * A043486 A043487 A043488

Keyword

nonn,base

Author

Clark Kimberling

Extensions

Name edited by Michel Marcus, Oct 13 2020

Status

approved