login
Numbers with exactly five distinct base-6 digits.
0

%I #16 Aug 10 2021 18:47:40

%S 1390,1391,1395,1397,1401,1402,1420,1421,1430,1433,1436,1438,1455,

%T 1457,1460,1463,1472,1473,1491,1492,1496,1498,1502,1503,1750,1751,

%U 1755,1757,1761,1762,1840,1841,1860,1865,1866,1870

%N Numbers with exactly five distinct base-6 digits.

%t dc5Q[n_]:=Count[DigitCount[n,6],_?(#>0&)]==5; Select[Range[2000], dc5Q] (* _Harvey P. Dale_, Apr 12 2011 *)

%Y Cf. A007092.

%K nonn,base

%O 1,1

%A _Clark Kimberling_