A102100 Row sums of triangular matrix A102098, which shifts upward to exclude the main diagonal under matrix cube.
1, 3, 18, 322, 12979, 924628, 103158338, 16710522378, 3724631345923, 1097090407192683, 413803244841678483, 194887616017161359389, 112265654949194591311618, 77751843768367000711311005
Offset: 0
Keywords
Programs
-
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(sum(k=0,n,A[n+1,k+1]))}