|
| |
|
|
A107293
|
|
The (1,1)-entry of the matrix M^n, where M is the 5 X 5 matrix [[0,1,0,0,0],[0,0,1,0,0],[0,0,0,1,0],[0,0,0,0,1],[1,0,-1,1,1]].
|
|
11
| |
|
|
0, 0, 0, 0, 1, 1, 2, 2, 3, 4, 6, 9, 13, 19, 27, 39, 56, 81, 117, 169, 244, 352, 508, 733, 1058, 1527, 2204, 3181, 4591, 6626, 9563, 13802, 19920, 28750, 41494, 59887, 86433, 124746, 180042, 259849, 375032, 541272, 781201, 1127483, 1627261, 2348575
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,7
|
|
|
COMMENTS
| Also the (1,2)-entries of M^n (n=1,2,...).
Characteristic polynomial of the matrix M is x^5-x^4-x^3+x^2-1.
|
|
|
FORMULA
| Recurrence relation: a(n)=a(n-1)+a(n-2)-a(n-3)+a(n-5) for n>=5; a(0)=a(1)=a(2)=a(3)=0,a(4)=1.
O.g.f: -x^4/(-1+x+x^2-x^3+x^5) . - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Dec 02 2007
|
|
|
MAPLE
| a[0]:=0:a[1]:=0:a[2]:=0:a[3]:=0:a[4]:=1: for n from 5 to 45 do a[n]:=a[n-1]+a[n-2]-a[n-3]+a[n-5] od: seq(a[n], n=0..45);
|
|
|
MATHEMATICA
| M = {{0, 1, 0, 0, 0}, {0, 0, 1, 0, 0}, {0, 0, 0, 1, 0}, {0, 0, 0, 0, 1}, {1, 0, -1, 1, 1}} ones = Table[MatrixPower[M, i][[1, 1]], {i, 1, 50}]
|
|
|
CROSSREFS
| Sequence in context: A005856 A157876 A174650 * A001611 A039829 A143588
Adjacent sequences: A107290 A107291 A107292 * A107294 A107295 A107296
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jun 08 2005
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane (njas(AT)research.att.com), May 12 2006
|
| |
|
|
