|
%I #12 Jun 30 2021 23:59:57
%S 42,75,186,219,330,363,438,450,462,486,498,504,505,506,508,509,511,
%T 512,513,514,515,522,534,546,558,570,618,651,762,795,867,879,891,900,
%U 901,902,904,905,907,908,909,910,911,915,927,951,963,975,987,999,1050
%N Numbers whose base-12 representation has the same nonzero number of 3's and 6's.
%t Select[Range[1200],DigitCount[#,12,3]==DigitCount[#,12,6]>0&] (* _Harvey P. Dale_, Jan 08 2015 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
