|
Search: id:A123960
|
|
|
| A123960 |
|
A 4 X 4 vector matrix Markov with characteristic polynomial: 49 - 80 x + 45 x^2 - 11 x^3 + x^4. |
|
+0
1
|
|
| 0, 0, 0, 2, 22, 152, 842, 4084, 18116, 75408, 299730, 1152834, 4338280, 16126958, 59713888, 221713192, 829301072, 3132108250, 11945717358, 45938159040, 177695375802, 689616061412, 2679197337100, 10403108215760, 40332521702522
(list; graph; listen)
|
|
|
OFFSET
|
1,4
|
|
|
FORMULA
|
M = {{2, -1, 0, 0}, {-1, 3, -1, 0}, {0, -1, 3, 2}, {0, 0, -1, 3}}; v[1] = {0, 0, 0, 1}; v[n_] := v[n] = M.v[n - 1]; a(n) = v[n][[1]]
|
|
MATHEMATICA
|
M = {{2, -1, 0, 0}, {-1, 3, -1, 0}, {0, -1, 3, 2}, {0, 0, -1, 3}}; 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: A062180 A084399 A067057 this_sequence A091169 A000184 A007613
Adjacent sequences: A123957 A123958 A123959 this_sequence A123961 A123962 A123963
|
|
KEYWORD
|
nonn,uned,probation
|
|
AUTHOR
|
Gary Adamson and Roger Bagula (rlbagulatftn(AT)yahoo.com), Oct 28 2006
|
|
|
Search completed in 0.002 seconds
|
