A102088 Row sums of triangular matrix A102086, which shifts upward to exclude the main diagonal under matrix square.

1, 3, 10, 49, 367, 3850, 52173, 868614, 17199370, 395757887, 10396896795, 307511681367, 10124396776169, 367567456615441, 14598938725992903, 630060602243145513, 29375322688053255480, 1472008290120323375502

Offset

0,2

Links

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

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

Crossrefs

Cf. A102086, A102087.

Sequence in context: A082426 A359459 A054381 * A297295 A088142 A276028

Adjacent sequences: A102085 A102086 A102087 * A102089 A102090 A102091

Keyword

nonn

Author

Paul D. Hanna, Dec 29 2004

Status

approved