login
A044954
Numbers with no two equally numerous base 5 digits.
2
1, 2, 3, 4, 6, 12, 18, 24, 25, 26, 30, 31, 32, 33, 34, 36, 37, 41, 43, 46, 49, 50, 52, 56, 57, 60, 61, 62, 63, 64, 67, 68, 72, 74, 75, 78, 81, 83, 87, 88, 90, 91, 92, 93, 94, 98, 99, 100, 104, 106, 109, 112, 114, 118, 119, 120, 121, 122, 123
OFFSET
1,2
MATHEMATICA
nten5Q[n_]:=Module[{c=Select[DigitCount[n, 5], #>0&]}, Length[c] == Length[ Union[ c]]]; Select[Range[150], nten5Q] (* Harvey P. Dale, Mar 08 2015 *)
CROSSREFS
Sequence in context: A173581 A075122 A018333 * A297133 A044816 A048302
KEYWORD
nonn,base
STATUS
approved