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

1, 10, 100, 1001, 10010, 100101, 1001011, 10010110, 100101100, 1001011001, 10010110011, 100101100110, 1001011001101, 10010110011010, 100101100110100, 1001011001101001, 10010110011010010, 100101100110100101

Offset

0,2

Links

Table of n, a(n) for n=0..17.

Formula

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

Mathematica

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

Crossrefs

Cf. A019299.

Sequence in context: A266071 A118256 A351386 * A132347 A215254 A262863

Adjacent sequences: A102394 A102395 A102396 * A102398 A102399 A102400

Keyword

base,easy,nonn

Author

Paul Barry, Jan 06 2005

Status

approved