|
%I #13 Jul 01 2021 00:03:00
%S 83,138,227,282,371,426,515,570,659,714,803,858,875,887,899,911,923,
%T 935,959,971,983,995,996,997,998,999,1000,1001,1003,1004,1005,1006,
%U 1091,1146,1235,1290,1379,1434,1523,1578,1590,1602,1614,1626,1638
%N Numbers whose base-12 representation has the same nonzero number of 6's and 11's.
%t Select[Range[2000],DigitCount[#,12,6]==DigitCount[#,12,11]>0&] (* _Harvey P. Dale_, Nov 02 2011 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
