|
%I #13 Jun 30 2021 04:31:58
%S 51,81,172,202,293,323,414,444,491,502,513,524,546,557,561,562,563,
%T 564,566,567,569,570,571,579,590,601,656,686,777,807,851,862,873,884,
%U 891,892,893,894,896,897,899,900,901,906,917,939,950,961,1019,1049
%N Numbers whose base-11 representation has the same nonzero number of 4's and 7's.
%t Select[Range[1200],DigitCount[#,11,4]==DigitCount[#,11,7]>0&] (* _Harvey P. Dale_, Mar 14 2011 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
