A102104 Row sums of triangular matrix A102101, which shifts upward to exclude the main diagonal under matrix fourth power.

1, 3, 34, 2125, 399551, 167436757, 133589812359, 182634217743739, 396471609861950572, 1290175805332297239092, 6016194958934722148801658, 38771533093655782191893463830, 335219158226849230801472869515158

Offset

0,2

Links

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

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^4)[i-1, 1], B[i, j]=(A^4)[i-1, j])); )); A=B); return(sum(k=0, n, A[n+1, k+1]))}

Crossrefs

Cf. A102101.

Sequence in context: A324234 A366137 A337069 * A194890 A197434 A194891

Adjacent sequences: A102101 A102102 A102103 * A102105 A102106 A102107

Keyword

nonn

Author

Paul D. Hanna, Dec 29 2004

Status

approved