|
| |
|
|
A123188
|
|
a(n)=-5a(n-1)+8a(n-2)+6a(n-3)-4a(n-4).
|
|
0
| |
|
|
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; refs; listen; history; internal format)
|
|
|
|
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: A013555 A018987 A030518 * A027329 A136794 A125787
Adjacent sequences: A123185 A123186 A123187 * 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
|
| |
|
|
