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

Author

Clark Kimberling

Keywords

• nonn
• base

Links

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

Programs

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 *)