|
| |
|
|
A123957
|
|
G.f.: x^4/( (2*x+1) * (2*x^3+x^2-2*x+1)).
|
|
0
| |
|
|
0, 0, 0, 1, 0, 3, -4, 5, -24, 19, -76, 133, -208, 627, -852, 2181, -4232, 7443, -18012, 30533, -66880, 133875, -250724, 547013, -1020152, 2108435, -4245612, 8217861, -17089968, 33202291, -67158900, 135095301, -265925992, 541112339, -1069523580, 2146659781, -4309316128, 8553624307
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,6
|
|
|
FORMULA
| a(n)= 3*a(n-2) -4*a(n-3) -4*a(n-4).
a(n)= (-2)^n/32 -9*A077942(n)/32 +10*A077942(n-1)/16 -17*A077942(n-2)/32, n>3 . [Mar 28, 2010]
|
|
|
MATHEMATICA
| M = {{0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}, {-4, -4, 3, 0}}; v[1] = {0, 0, 0, 1}; v[n_] := v[n] = M.v[n - 1]; a1 = Table[v[n][[1]], {n, 1, 50}]
|
|
|
CROSSREFS
| Sequence in context: A037347 A116474 A126896 * A085285 A085841 A163483
Adjacent sequences: A123954 A123955 A123956 * A123958 A123959 A123960
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Roger Bagula and Gary Adamson (rlbagulatftn(AT)yahoo.com), Oct 27 2006
|
|
|
EXTENSIONS
| Definition replaced with generating function - the Assoc. Eds of the OEIS, Mar 28 2010
|
| |
|
|