A031474 Numbers whose base-5 representation has one fewer 0 than 4's.

4, 9, 14, 19, 21, 22, 23, 34, 39, 44, 46, 47, 48, 59, 64, 69, 71, 72, 73, 84, 89, 94, 96, 97, 98, 104, 106, 107, 108, 111, 112, 113, 116, 117, 118, 120, 149, 159, 164, 169, 171, 172, 173, 184, 189, 194, 196, 197, 198, 209, 214, 219

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Cf. A007091.

Sequence in context: A023738 A070799 A277548 * A045203 A313082 A131280

Adjacent sequences: A031471 A031472 A031473 * A031475 A031476 A031477

Keyword

nonn,base

Author

Clark Kimberling

Status

approved