login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Numbers whose base-8 representation has the same nonzero number of 0's and 6's.
1

%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_