Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #19 Jun 28 2021 23:30:44
%S 48,70,112,134,176,198,240,262,304,326,368,385,386,387,388,389,391,
%T 392,400,408,416,424,440,454,496,526,534,542,550,558,561,562,563,564,
%U 565,567,574,582,624,646,688,710,752,774,816,838,880,897,898,899,900
%N Numbers whose base-8 representation has the same nonzero number of 0's and 6's.
%H Jonathan Frech, <a href="/A039334/b039334.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[900], And[SameQ @@ #, AllTrue[#, # > 0 &]] &@ DigitCount[#, 8, {0, 6}] &] (* _Michael De Vlieger_, Apr 07 2021 *)
%K nonn,base,easy
%O 1,1
%A _Olivier GĂ©rard_