A139478 a(n) = A001109(n) in binary.

1, 110, 100011, 11001100, 10010100101, 1101100010010, 1001110111000111, 111001011110011000, 101001110111111001001, 11110100000011100011110, 10110001110011101011101011, 10000001100010101101001100100

Offset

1,2

Links

Table of n, a(n) for n=1..12.

Mathematica

a = {}; Do[k = IntegerDigits[Expand[((2*Sqrt[2] + 3)^(n) - (3 - 2*Sqrt[2])^(n))/(4*Sqrt[2])], 2]; AppendTo[a, FromDigits[k]], {n, 1, 50}]; a (*Artur Jasinski*)

Crossrefs

Cf. A001109, A139473, A139474, A139475, A139476, A139478.

Sequence in context: A295444 A295436 A246635 * A329126 A329338 A203718

Adjacent sequences: A139475 A139476 A139477 * A139479 A139480 A139481

Keyword

base,nonn

Author

Artur Jasinski, Apr 22 2008

Status

approved