%I
%S 47,135,191,279,335,423,443,455,467,491,503,515,527,539,551,563,564,
%T 565,566,568,569,570,571,572,573,574,623,711,767,855,911,999,1055,
%U 1143,1199,1287,1343,1431,1487,1575,1587,1599,1611,1620,1621,1622
%N Numbers whose base-12 representation has the same nonzero number of 3's and 11's.
%t Select[Range[2000],DigitCount[#,12,3]==DigitCount[#,12,11]>0&] (* _Harvey P. Dale_, Jan 08 2015 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|