|
Search: id:A140806
|
|
|
| A140806 |
|
A Matrix Markov sequence based on the polynomial in the cubic elliptic invariant of A113922: characteristic polynomial x^8+14*x64+1; Bezout matrix: M = {{0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {-1, 0, 0, 0, -14, 0, 0, 0}}. |
|
+0 1
|
|
| 1, 1, 1, 1, 1, 1, 1, 1, -15, -15, -15, -15, 209, 209, 209, 209, -2911, -2911, -2911, -2911, 40545, 40545, 40545, 40545, -564719, -564719, -564719, -564719, 7865521, 7865521, 7865521, 7865521, -109552575, -109552575, -109552575, -109552575, 1525870529, 1525870529, 1525870529
(list; table; graph; listen)
|
|
|
OFFSET
|
1,9
|
|
|
FORMULA
|
M = {{0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {-1, 0, 0, 0, -14, 0, 0, 0}}; v(n)=M.v(n-1): a9n)=v(n)( element 1).
|
|
MATHEMATICA
|
= {{0, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 0, 0, 1}, {-1, 0, 0, 0, -14, 0, 0, 0}}; v[0] = {1, 1, 1, 1, 1, 1, 1, 1}; v[n_] := v[n] = M.v[n - 1]; a = Table[v[n][[1]], {n, 0, 50}]
|
|
CROSSREFS
|
Cf. A113922.
Sequence in context: A069785 A010854 A003884 this_sequence A085321 A003890 A040211
Adjacent sequences: A140803 A140804 A140805 this_sequence A140807 A140808 A140809
|
|
KEYWORD
|
uned,tabl,sign
|
|
AUTHOR
|
Roger L. Bagula and Gary W. Adamson (rlbagulatftn(AT)yahoo.com), Jul 15 2008
|
|
|
Search completed in 0.002 seconds
|