|
Search: id:A106433
|
|
|
| A106433 |
|
Yet another way to compute A028860 ( first two terms different) : 2 X 2 vector Matrix Markov with characteristic Polynomial: x^2-2*x-2. |
|
+0 1
|
|
| 0, 2, 4, 12, 32, 88, 240, 656, 1792, 4896, 13376, 36544, 99840, 272768, 745216, 2035968, 5562368, 15196672, 41518080, 113429504, 309895168, 846649344, 2313089024, 6319476736, 17265131520, 47169216512, 128868696064
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
Real Pisot roots:{-0.732051, 2.73205}
|
|
LINKS
|
Tanya Khovanova, Recursive Sequences
|
|
FORMULA
|
M = {{0, 2}, {1, 2}} v[n]=M. v[n-1] a(n) = Abs[v[n][[i]]
|
|
MATHEMATICA
|
M = {{0, 2}, {1, 2}} v[1] = {0, 1} v[n_] := v[n] = M.v[n - 1] a = Table[Abs[v[n][[1]]], {n, 1, 50}]
|
|
CROSSREFS
|
Cf. A028860.
Essentially the same as A028860.
Sequence in context: A141312 A109388 A028860 this_sequence A026151 A025178 A087211
Adjacent sequences: A106430 A106431 A106432 this_sequence A106434 A106435 A106436
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), May 29 2005
|
|
|
Search completed in 0.002 seconds
|