A102102
Column 0 of triangular matrix A102101, which shifts upward to exclude the main diagonal under matrix fourth power.
Original entry on oeis.org
1, 1, 15, 1000, 189035, 79278446, 63263422646, 86493299281972, 187766975052827491, 611024291011881918991, 2849262494779035461688236, 18362167739517547774072439880, 158759599858376078627687256207242
Offset: 0
-
{a(n)=local(A=matrix(1,1),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(A[n+1,1])}
A102103
Column 1 of triangular matrix A102101, which shifts upward to exclude the main diagonal under matrix fourth power.
Original entry on oeis.org
0, 2, 16, 1040, 196080, 82196224, 65585046960, 89664824687968, 194650170795350624, 633421180929983545024, 2953697281799409438455088, 19035190329068182887341039344, 164578521474330559730154886587328
Offset: 0
-
{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(A[n+1,2])}
A102104
Row sums of triangular matrix A102101, which shifts upward to exclude the main diagonal under matrix fourth power.
Original entry on oeis.org
1, 3, 34, 2125, 399551, 167436757, 133589812359, 182634217743739, 396471609861950572, 1290175805332297239092, 6016194958934722148801658, 38771533093655782191893463830, 335219158226849230801472869515158
Offset: 0
-
{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]))}
Showing 1-3 of 3 results.
Comments