login
a(n) = concatenation of first n elements of Thue-Morse sequence A010059.
2

%I #4 May 15 2016 10:25:23

%S 1,10,100,1001,10010,100101,1001011,10010110,100101100,1001011001,

%T 10010110011,100101100110,1001011001101,10010110011010,

%U 100101100110100,1001011001101001,10010110011010010,100101100110100101

%N a(n) = concatenation of first n elements of Thue-Morse sequence A010059.

%F a(n)=sum{k=0..n, (1+(-1)^A010060(n-k))10^k/2}.

%t With[{tm=Nest[Join[#,Mod[2#+1,3]]&,{1},10]},Table[FromDigits[Take[tm,n]],{n,20}]] (* _Harvey P. Dale_, May 15 2016 *)

%Y Cf. A019299.

%K base,easy,nonn

%O 0,2

%A _Paul Barry_, Jan 06 2005