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

Author

Olivier Gérard

Keywords

• nonn
• base
• easy

Links

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

Programs

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

Mathematica

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