%I #14 Oct 19 2024 16:19:30
%S 12,36,54,68,75,82,84,86,87,88,90,96,110,134,159,183,208,232,246,252,
%T 254,255,256,258,260,267,274,288,306,330,348,362,369,376,378,380,381,
%U 382,384,390,432,446,460,467,474,476,478,479,480,482,488,495,509,516
%N Numbers whose base-7 representation has the same nonzero number of 1's and 5's.
%t Select[Range[600],DigitCount[#,7,1]==DigitCount[#,7,5]>0&] (* _Harvey P. Dale_, Oct 19 2024 *)
%Y Cf. A007093.
%K nonn,base,easy
%O 1,1
%A _Olivier GĂ©rard_