cp's OEIS Frontend

A071925 Digitally balanced numbers: binary numbers which have the same number of 0's as 1's; decimal representation: A031443.

%I A071925 #18 Sep 08 2024 16:50:41
%S A071925 10,1001,1010,1100,100011,100101,100110,101001,101010,101100,110001,
%T A071925 110010,110100,111000,10000111,10001011,10001101,10001110,10010011,
%U A071925 10010101,10010110,10011001,10011010,10011100,10100011
%N A071925 Digitally balanced numbers: binary numbers which have the same number of 0's as 1's; decimal representation: A031443.
%H A071925 Harvey P. Dale, <a href="/A071925/b071925.txt">Table of n, a(n) for n = 1..2000</a>
%F A071925 a(n) = A007088(A031443(n)).
%t A071925 Select[FromDigits/@Tuples[{0,1},8],DigitCount[#,10,1]==DigitCount[#,10,0]&] (* _Harvey P. Dale_, Sep 08 2024 *)
%o A071925 (Python)
%o A071925 from itertools import islice, count
%o A071925 from sympy.utilities.iterables import multiset_permutations
%o A071925 def A071925gen(): # generator of terms
%o A071925     for n in count(1):
%o A071925         yield from (int('1'+''.join(p)) for p in multiset_permutations('0'*n+'1'*(n-1)))
%o A071925 A071925_list = list(islice(A071925gen(),30)) # _Chai Wah Wu_, Dec 06 2021
%Y A071925 Cf. A007088, A031443.
%K A071925 nonn,base
%O A071925 1,1
%A A071925 _Reinhard Zumkeller_, Jun 14 2002