|
Search: id:A139478
|
|
| |
|
| 1, 110, 100011, 11001100, 10010100101, 1101100010010, 1001110111000111, 111001011110011000, 101001110111111001001, 11110100000011100011110, 10110001110011101011101011, 10000001100010101101001100100
(list; graph; listen)
|
|
|
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: A090490 A135650 A097580 this_sequence A143750 A028673 A138280
Adjacent sequences: A139475 A139476 A139477 this_sequence A139479 A139480 A139481
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Apr 22 2008
|
|
|
Search completed in 0.002 seconds
|
