|
Search: id:A122008
|
|
|
| A122008 |
|
3 X 3 addition table taken as vector matrix Markov to give three parallel sequences: characteristic polynomial: -(-3+x)*(-3+x^2). |
|
+0 1
|
|
| 1, 0, 5, 6, 33, 72, 261, 702, 2241, 6480, 19845, 58806, 177633, 530712, 1595781, 4780782, 14353281, 43040160, 129153285, 387400806, 1162300833, 3486725352, 10460471301, 31380882462, 94143533121, 282429005040, 847289672325
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
COMMENT
|
Limit[a[n+1]/a[n],n->Infinity]=3
|
|
REFERENCES
|
"Linear Algebra, Examples and Applications" by Alain M. Robert, World Scientific, 2005, p. 58.
|
|
FORMULA
|
M = {{0, 1, 2}, {1, 2, 0}, {2, 0, 1}} v[1] = {1, 0, 0} v[n_] := v[n] = M.v[n - 1] a(n) = v[n][[1]]
|
|
MATHEMATICA
|
M = {{0, 1, 2}, {1, 2, 0}, {2, 0, 1}} v[1] = {1, 0, 0} v[n_] := v[n] = M.v[n - 1] a1 = Table[v[n][[1]], {n, 1, 50}]
|
|
CROSSREFS
|
Sequence in context: A166023 A137762 A151506 this_sequence A036254 A047170 A137254
Adjacent sequences: A122005 A122006 A122007 this_sequence A122009 A122010 A122011
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger Bagula and Gary Adamson (rlbagulatftn(AT)yahoo.com), Sep 11 2006
|
|
|
Search completed in 0.002 seconds
|