|
|
A113679
|
|
Expansion of (1-x-2x^2)/(1-x).
|
|
2
|
|
|
1, 0, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -2
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
Signed (1, 0, -2, 2, -2, 2, ...) and convolved with the Toothpick sequence A139250 = A151548: (1, 3, 5, 7, 5, 11, ...). The inverse of (1, 0, -2, 2, -2, ...) = A151575: (1, 0, 2, -2, 6, -10, 22, ...).
The unsigned sequence convolved with:
(1, 2, 3, ...) = A002523, (n^2 + 1). Convolved with:
(End)
|
|
LINKS
|
|
|
FORMULA
|
a(n) = C(0, n) + 2*C(1, n) - 2.
|
|
MATHEMATICA
|
CoefficientList[Series[(1-x-2x^2)/(1-x), {x, 0, 80}], x] (* or *) Join[{1, 0}, PadRight[{}, 80, -2]] (* Harvey P. Dale, Mar 05 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|