|
| |
|
|
A113101
|
|
Triangle T, read by rows, equal to the matrix 4-th power of triangle A113095, which satisfies the recurrence: A113095(n,k) = [A113095^4](n-1,k-1) + [A113095^4](n-1,k).
|
|
3
| |
|
|
1, 4, 1, 46, 20, 1, 1504, 894, 84, 1, 146821, 108292, 14622, 340, 1, 45236404, 39188597, 6812596, 233758, 1364, 1, 46002427696, 45157269264, 9504275037, 428894516, 3733278, 5460, 1, 159443238441379, 172969059719500
(list; table; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| Column 0 equals A113096 shift left one place.
|
|
|
EXAMPLE
| Triangle begins:
1;
4,1;
46,20,1;
1504,894,84,1;
146821,108292,14622,340,1;
45236404,39188597,6812596,233758,1364,1;
46002427696,45157269264,9504275037,428894516,3733278,5460,1;
|
|
|
PROG
| (PARI) {T(n, k)=local(M=matrix(n+1, n+1)); for(r=1, n+1, for(c=1, r, M[r, c]=if(r==c, 1, if(c>1, (M^4)[r-1, c-1])+(M^4)[r-1, c]))); return((M^4)[n+1, k+1])}
|
|
|
CROSSREFS
| Cf. A113092 (table), A113096 (column 0).
Sequence in context: A193962 A092667 A060627 * A113112 A069740 A173008
Adjacent sequences: A113098 A113099 A113100 * A113102 A113103 A113104
|
|
|
KEYWORD
| nonn,tabl
|
|
|
AUTHOR
| Paul D. Hanna (pauldhanna(AT)juno.com), Oct 14 2005
|
| |
|
|
