|
| |
|
|
A139478
|
|
a(n) = A001109(n) in binary.
|
|
2
| |
|
|
1, 110, 100011, 11001100, 10010100101, 1101100010010, 1001110111000111, 111001011110011000, 101001110111111001001, 11110100000011100011110, 10110001110011101011101011, 10000001100010101101001100100
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
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: A135650 A193240 A097580 * A203718 A143750 A192844
Adjacent sequences: A139475 A139476 A139477 * A139479 A139480 A139481
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Apr 22 2008
|
| |
|
|
