%I #14 Jun 28 2021 04:35:13
%S 24,40,60,76,96,112,132,145,146,147,149,150,156,162,174,184,204,226,
%T 232,238,241,242,243,245,250,256,276,292,312,328,348,361,362,363,365,
%U 366,372,378,390,400,420,442,448,454,457,458,459,461,466,472,492,508
%N Numbers whose base-6 representation has the same nonzero number of 0's and 4's.
%t Select[Range[600],DigitCount[#,6,0]==DigitCount[#,6,4]>0&] (* _Harvey P. Dale_, Feb 23 2018 *)
%Y Cf. A007092.
%K nonn,base,easy
%O 1,1
%A _Olivier GĂ©rard_
|