|
%I #14 Jun 29 2021 02:23:08
%S 21,42,85,106,133,141,157,165,168,169,171,172,174,175,181,189,213,234,
%T 277,298,322,330,336,337,339,340,342,343,346,354,370,378,405,426,469,
%U 490,533,554,597,618,645,653,669,677,680,681,683,684,686,687,693,701
%N Numbers whose base-8 representation has the same nonzero number of 2's and 5's.
%t Select[Range[1000],DigitCount[#,8,2]==DigitCount[#,8,5]>0&] (* _Harvey P. Dale_, Oct 25 2015 *)
%Y Cf. A007094.
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
