Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #14 Jun 20 2021 15:03:13
%S 1,2,3,5,6,8,9,10,12,13,15,16,17,19,20,22,23,24,26,27,28,36,37,38,40,
%T 41,43,44,45,47,48,53,57,58,59,61,62,64,65,66,68,69,71,72,73,75,76,77,
%U 85,86,87,89,90,92,93,94,96,97,102,106,107,108,110,111,113,114,115
%N Numbers whose base-7 representation has the same number of 0's and 4's.
%H Daniel Starodubtsev, <a href="/A039033/b039033.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[200],DigitCount[#,7,0]==DigitCount[#,7,4]&] (* _Harvey P. Dale_, Jul 31 2014 *)
%Y Cf. A007093.
%K nonn,base,easy
%O 1,2
%A _Olivier GĂ©rard_