|
Search: id:A121959
|
|
|
| A121959 |
|
Quartic 4 X 4 matrix Markov of the A001053 type: characteristic Polynomial:x^4-n*x^2-1. |
|
+0
1
|
|
| 0, 1, 2, 3, 6, 19, 78, 393, 2364, 16567, 132614, 1193919, 11941554, 131373661, 1576616546, 20497209017, 286972867792, 4304724390541, 68877166865202, 1170932333917451, 21077068983381910, 400468615408646831
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
FORMULA
|
M = {{0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}, {1, 0, 0, n}} v[1] = {0, 1, 2, 3} v[n_] := v[n] = M.v[n - 1] a(n) = v[n][[1]]
|
|
MATHEMATICA
|
M = {{0, 1, 0, 0}, {0, 0, 1, 0}, {0, 0, 0, 1}, {1, 0, 0, n}} v[1] = {0, 1, 2, 3} v[n_] := v[n] = M.v[n - 1] a = Table[Floor[v[n][[1]]], {n, 1, 30}] Det[M - x*IdentityMatrix[4]]
|
|
CROSSREFS
|
Cf. A001053.
Sequence in context: A000304 A000614 A018290 this_sequence A075633 A124066 A093447
Adjacent sequences: A121956 A121957 A121958 this_sequence A121960 A121961 A121962
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 02 2006
|
|
|
Search completed in 0.002 seconds
|
