A039054 Numbers whose base-8 representation has the same number of 0's and 5's.

1, 2, 3, 4, 6, 7, 9, 10, 11, 12, 14, 15, 17, 18, 19, 20, 22, 23, 25, 26, 27, 28, 30, 31, 33, 34, 35, 36, 38, 39, 40, 49, 50, 51, 52, 54, 55, 57, 58, 59, 60, 62, 63, 69, 73, 74, 75, 76, 78, 79, 81, 82, 83, 84, 86, 87, 89, 90, 91, 92, 94, 95, 97, 98, 99, 100, 102, 103, 104

Offset

1,2

Links

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

Mathematica

Select[Range[200], DigitCount[#, 8, 5] == DigitCount[#, 8, 0] &] (* Vincenzo Librandi, Oct 26 2016 *)

Prog

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

Crossrefs

Sequence in context: A026514 A285974 A227194 * A047519 A070118 A070124

Adjacent sequences: A039051 A039052 A039053 * A039055 A039056 A039057

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved