A044963 Numbers with no two equally numerous base 14 digits.
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 15, 30, 45, 60, 75, 90, 105, 120, 135, 150, 165, 180, 195, 196, 197, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 225, 226, 239, 241, 253, 256, 267, 271, 281, 286
Offset: 1
Programs
-
Mathematica
ten14Q[n_]:=Module[{t=Tally[IntegerDigits[n,14]][[All,2]]},Length[t] == Length[ Union[t]]]; Select[Range[300],ten14Q] (* Harvey P. Dale, Aug 28 2019 *)