|
%I #13 Jun 30 2021 01:54:01
%S 23,47,104,128,167,176,194,203,207,208,210,211,213,214,215,221,230,
%T 239,266,290,347,371,407,416,423,424,426,427,429,430,431,434,443,461,
%U 470,479,509,533,590,614,671,695,752,776,833,857,896,905,923,932,936
%N Numbers whose base-9 representation has the same nonzero number of 2's and 5's.
%t Select[Range[1000],DigitCount[#,9,2]==DigitCount[#,9,5]>0&] (* _Harvey P. Dale_, Dec 16 2019 *)
%Y Cf. A007095.
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
