A044955 Numbers with no two equally numerous base 6 digits.

1, 2, 3, 4, 5, 7, 14, 21, 28, 35, 36, 37, 42, 43, 44, 45, 46, 47, 49, 50, 55, 57, 61, 64, 67, 71, 72, 74, 79, 80, 84, 85, 86, 87, 88, 89, 92, 93, 98, 100, 104, 107, 108, 111, 115, 117, 122, 123, 126, 127, 128, 129, 130, 131, 135, 136, 141

Offset

1,2

Links

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

Mathematica

en6Q[n_]:=Module[{d6=DeleteCases[DigitCount[n, 6], 0]}, Length[d6] == Length[ Union[ d6]]]; Select[Range[150], en6Q] (* Harvey P. Dale, Feb 23 2022 *)

Crossrefs

Sequence in context: A039060 A278442 A092065 * A297136 A044817 A048303

Adjacent sequences: A044952 A044953 A044954 * A044956 A044957 A044958

Keyword

nonn,base

Author

Clark Kimberling

Status

approved