A044955 - OEIS

%I #7 Feb 23 2022 12:59:15

%S 1,2,3,4,5,7,14,21,28,35,36,37,42,43,44,45,46,47,49,50,55,57,61,64,67,

%T 71,72,74,79,80,84,85,86,87,88,89,92,93,98,100,104,107,108,111,115,

%U 117,122,123,126,127,128,129,130,131,135,136,141

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

%t en6Q[n_]:=Module[{d6=DeleteCases[DigitCount[n,6],0]},Length[d6] == Length[ Union[ d6]]]; Select[Range[150],en6Q] (* _Harvey P. Dale_, Feb 23 2022 *)

%K nonn,base

%O 1,2

%A _Clark Kimberling_