|
%I #18 Jun 29 2021 02:18:56
%S 35,54,84,103,133,152,182,201,231,246,247,248,249,251,252,259,266,273,
%T 287,299,329,355,362,369,376,379,380,381,382,384,390,397,427,446,476,
%U 495,525,544,574,589,590,591,592,594,595,602,609,616,630,642,672,698
%N Numbers whose base-7 representation has the same nonzero number of 0's and 5's.
%t Select[Range[750],DigitCount[#,7,0]==DigitCount[#,7,5]>0&] (* _Harvey P. Dale_, Jun 24 2011 *)
%Y Cf. A007093.
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
