A289748 - OEIS

%I #20 Sep 09 2021 08:15:40

%S 1,1,0,1,1,1,1,1,0,1,1,1,0,1,0,1,1,1,1,1,0,1,0,1,1,1,0,1,1,1,1,1,0,1,

%T 1,1,0,1,0,1,1,1,0,1,1,1,1,1,0,1,0,1,1,1,1,1,0,1,1,1,0,1,0,1,1,1,1,1,

%U 0,1,0,1,1,1,0,1,1,1,1,1,0,1,0,1,1,1,1,1,0,1,1,1,0,1,0,1,1,1,0,1,1,1,1,1,0

%N Thue-Morse constant converted to base -2.

%C Base -2 is also called negabinary. Interpreting the sequence as a binary number with the first '1' at place 2^0 gives 1.101111101110... which in decimal equals M = 1.745787366973...

%F M = Thue-Morse + 4/3 (conjectured).

%o (Python)

%o def N(x):

%o     return x + 0xAAAAAAAAAAAAAAAA ^ 0xAAAAAAAAAAAAAAAA

%o def parityOf(int_type):

%o     parity = 0

%o     while (int_type):

%o         parity = ~parity

%o         int_type = int_type & (int_type - 1)

%o     return(abs(parity))

%o A010060 = ""

%o for i in range(0,40):

%o     A010060 = A010060 + str(parityOf(i))

%o A289748 = ",".join(bin(N(int(A010060, 2))).replace("0b", ""))

%o print(A289748)

%Y Cf. A010060, A014571.

%K nonn,easy,cons,base

%O 1

%A Gilian Breysens, Jul 11 2017