|
%I #13 Jun 20 2021 08:26:58
%S 23,33,59,69,95,105,113,119,125,137,138,139,140,142,167,177,183,189,
%T 195,198,199,200,202,207,239,249,275,285,311,321,329,335,341,353,354,
%U 355,356,358,383,393,399,405,411,414,415,416,418,423,455,465,491,501
%N Numbers whose base-6 representation has the same nonzero number of 3's and 5's.
%t Select[Range[600],DigitCount[#,6,3]==DigitCount[#,6,5]>0&] (* _Harvey P. Dale_, Apr 25 2012 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
