A102099 Column 1 of triangular matrix A102098, which shifts upward to exclude the main diagonal under matrix cube.

0, 2, 8, 152, 6200, 442552, 49399320, 8003532512, 1784040237288, 525504809786112, 198213959637435608, 93352856625931514024, 53776417402985961020144, 37244016639064540041311632

Offset

0,2

Comments

Column 0 of A102098 is A082162.

Links

Table of n, a(n) for n=0..13.

Prog

(PARI) {a(n)=local(A=matrix(2, 2), B); A[1, 1]=1; for(m=2, n+1, B=matrix(m, m); for(i=1, m, for(j=1, i, if(j==i, B[i, j]=j, if(j==1, B[i, j]=(A^3)[i-1, 1], B[i, j]=(A^3)[i-1, j])); )); A=B); return(A[n+1, 2])}

Crossrefs

Cf. A102098, A082162, A102100.

Sequence in context: A362729 A307326 A007314 * A012298 A009596 A012571

Adjacent sequences: A102096 A102097 A102098 * A102100 A102101 A102102

Keyword

nonn

Author

Paul D. Hanna, Dec 29 2004

Status

approved