|
%I
%S 41,63,185,207,329,351,437,449,461,485,492,493,494,496,498,499,500,
%T 501,502,503,509,521,533,545,557,569,617,639,723,735,747,756,757,758,
%U 760,762,763,764,765,766,767,771,795,807,819,831,843,855,905,927,1049
%N Numbers whose base-12 representation has the same nonzero number of 3's and 5's.
%t Select[Range[1100],DigitCount[#,12,3]==DigitCount[#,12,5]>0&] (* _Harvey P. Dale_, Jan 31 2012 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
