A044963 - OEIS

%I #7 Aug 28 2019 10:49:26

%S 1,2,3,4,5,6,7,8,9,10,11,12,13,15,30,45,60,75,90,105,120,135,150,165,

%T 180,195,196,197,210,211,212,213,214,215,216,217,218,219,220,221,222,

%U 223,225,226,239,241,253,256,267,271,281,286

%N Numbers with no two equally numerous base 14 digits.

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

%K nonn,base

%O 1,2

%A _Clark Kimberling_