|
Search: id:A123188
|
|
|
| A123188 |
|
a(n)=-5a(n-1)+8a(n-2)+6a(n-3)-4a(n-4). |
|
+0
1
|
|
| 1, 0, 2, -8, 52, -312, 1920, -11752, 72040, -441448, 2705368, -16579176, 101601976, -622645288, 3815745720, -23383962344, 143303497848, -878204132520, 5381881888440, -32981685665896, 202121044650488, -1238654600718888, 7590823719249208, -46518702391430632
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
REFERENCES
|
Catmull-Rom Splines: http://steve.hollasch.net/cgindex/curves/catmull-rom.html
|
|
MAPLE
|
a[1]:=1: a[2]:=0: a[3]:=2: a[4]:=-8: for n from 5 to 24 do a[n]:=-5*a[n-1]+8*a[n-2]+6*a[n-3]-4*a[n-4] od: seq(a[n], n=1..24);
|
|
MATHEMATICA
|
M = {{ -1, 3, -3, 1 }, { 2, -5, 4, -1 }, {-1, 0, 1, 0 }, { 0, 2, 0, 0 }}; v[1] = {1, 1, 1, 1}; v[n_] := v[n] = M.v[n - 1]; a1 = Table[v[n][[1]], {n, 1, 25}]
|
|
CROSSREFS
|
Sequence in context: A059429 A018987 A030518 this_sequence A027329 A136794 A125787
Adjacent sequences: A123185 A123186 A123187 this_sequence A123189 A123190 A123191
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Oct 03 2006
|
|
EXTENSIONS
|
Edited by N. J. A. Sloane (njas(AT)research.att.com), Oct 08 2006
|
|
|
Search completed in 0.002 seconds
|
