[go: up one dir, main page]

login
A102322
Column 1 of triangular matrix A102320, which that satisfies: T(n,k) = [T^2](n-1,k) when n>k>=0, with T(n,n) = (2*n+1).
1
0, 3, 9, 72, 945, 17568, 427770, 12979080, 473981445, 20308813128, 1001231706582, 55927084380552, 3495759750651978, 242012640619081152, 18398411206663695732, 1524754064472700613328, 136890662566189661556525
OFFSET
0,2
PROG
(PARI) {a(n)=local(A=Mat([1, 0; 1, 1]), B); for(m=2, n+1, B=matrix(m, m); for(i=1, m, for(j=1, i, if(j==i, B[i, j]=2*j-1, if(j==1, B[i, j]=(A^2)[i-1, 1], B[i, j]=(A^2)[i-1, j])); )); A=B); return(A[n+1, 2])}
CROSSREFS
Sequence in context: A321539 A163632 A321541 * A305855 A018576 A027290
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Jan 05 2005
STATUS
approved