A044961 Numbers with no two equally numerous base 12 digits.

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 26, 39, 52, 65, 78, 91, 104, 117, 130, 143, 144, 145, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 169, 170, 181, 183, 193, 196, 205, 209, 217, 222, 229, 235, 241, 248, 253, 261

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

nb12Q[n_]:=Module[{c=Select[DigitCount[n, 12], #>0&]}, Length[c] == Length[ Union[c]]]; Select[Range[300], nb12Q] (* Harvey P. Dale, Aug 13 2012 *)

Crossrefs

Sequence in context: A376278 A143290 A272038 * A044823 A048309 A043715

Adjacent sequences: A044958 A044959 A044960 * A044962 A044963 A044964

Keyword

nonn,base

Author

Clark Kimberling

Status

approved