A039135 Numbers whose base-10 representation has the same number of 3's and 4's.

0, 1, 2, 5, 6, 7, 8, 9, 10, 11, 12, 15, 16, 17, 18, 19, 20, 21, 22, 25, 26, 27, 28, 29, 34, 43, 50, 51, 52, 55, 56, 57, 58, 59, 60, 61, 62, 65, 66, 67, 68, 69, 70, 71, 72, 75, 76, 77, 78, 79, 80, 81, 82, 85, 86, 87, 88, 89, 90, 91, 92, 95, 96, 97, 98, 99, 100, 101, 102

Offset

1,3

Links

Daniel Starodubtsev, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[0, 200], DigitCount[#, 10, 3] == DigitCount[#, 10, 4] &] (* Vincenzo Librandi, Oct 27 2016 *)

Prog

(Magma) [n: n in [0..120] | Multiplicity(S, 3) eq Multiplicity(S, 4) where S is {*d: d in Intseq(n)*}]; // Vincenzo Librandi, Oct 27 2016

Crossrefs

Sequence in context: A057544 A039239 A039182 * A072957 A073416 A138100

Adjacent sequences: A039132 A039133 A039134 * A039136 A039137 A039138

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved