|
Search: id:A125501
|
|
|
| A125501 |
|
The (1,1)-entry in the matrix M^n, where M is the 7 X 7 Cartan matrix [2,-1,0,0,0,0,0; -1,2,-1,0,0,0,0; 0,-1,2,-1,0,0,-1; 0,0,-1,2,-1,0,0; 0,0,0,-1,2,-1,0; 0,0,0,0,-1,2,0; 0,0,-1,0,0,0,2]. |
|
+0 1
|
|
| 1, 2, 5, 14, 42, 132, 430, 1444, 4981, 17594, 63442, 232828, 867145, 3269034, 12446307, 47767466, 184508963, 716386598, 2793067210, 10926148172, 42857189054, 168471757292, 663434825367, 2616336659586, 10329939578230
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
REFERENCES
|
Wikipedia (E_7, Mathematics).
|
|
EXAMPLE
|
a(6) = 430 = leftmost term in M^6 * [1,0,0,0,0,0,0].
|
|
MAPLE
|
with(linalg): M[1]:=matrix(7, 7, [2, -1, 0, 0, 0, 0, 0, -1, 2, -1, 0, 0, 0, 0, 0, -1, 2, -1, 0, 0, -1, 0, 0, -1, 2, -1, 0, 0, 0, 0, 0, -1, 2, -1, 0, 0, 0, 0, 0, -1, 2, 0, 0, 0, -1, 0, 0, 0, 2]): for n from 2 to 30 do M[n]:=multiply(M[1], M[n-1]) od:1, seq(M[n][1, 1], n=1..30); - Emeric Deutsch (deutsch(AT)duke.poly.edu), Jan 20 2007
|
|
PROGRAM
|
(PARI) {a(n)=local(E7=[2, -1, 0, 0, 0, 0, 0; -1, 2, -1, 0, 0, 0, 0; 0, -1, 2, -1, 0, 0, -1; 0, 0, -1, 2, -1, 0, 0; 0, 0, 0, -1, 2, -1, 0; 0, 0, 0, 0, -1, 2, 0; 0, 0, -1, 0, 0, 0, 2]); (E7^n)[1, 1]} - Paul D. Hanna (pauldhanna(AT)juno.com), Jan 02 2007
|
|
CROSSREFS
|
Cf. A126566, A126567, A126569.
Sequence in context: A120588 A057413 A126567 this_sequence A126569 A162748 A061815
Adjacent sequences: A125498 A125499 A125500 this_sequence A125502 A125503 A125504
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Gary W. Adamson (qntmpkt(AT)yahoo.com), Dec 28 2006
|
|
EXTENSIONS
|
More terms from Paul D. Hanna (pauldhanna(AT)juno.com), Jan 02 2007
|
|
|
Search completed in 0.002 seconds
|