cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-4 of 4 results.

A113340 Triangle P, read by rows, such that P^2 transforms column k of P into column k+1 of P, so that column k of P equals column 0 of P^(2*k+1), where P^2 denotes the matrix square of P.

Original entry on oeis.org

1, 1, 1, 1, 3, 1, 1, 12, 5, 1, 1, 69, 35, 7, 1, 1, 560, 325, 70, 9, 1, 1, 6059, 3880, 889, 117, 11, 1, 1, 83215, 57560, 13853, 1881, 176, 13, 1, 1, 1399161, 1030751, 258146, 36051, 3421, 247, 15, 1, 1, 28020221, 21763632, 5633264, 805875, 77726, 5629, 330, 17, 1
Offset: 0

Views

Author

Paul D. Hanna, Nov 08 2005

Keywords

Examples

			Triangle P begins:
1;
1,1;
1,3,1;
1,12,5,1;
1,69,35,7,1;
1,560,325,70,9,1;
1,6059,3880,889,117,11,1;
1,83215,57560,13853,1881,176,13,1;
1,1399161,1030751,258146,36051,3421,247,15,1;
1,28020221,21763632,5633264,805875,77726,5629,330,17,1;
1,654110586,531604250,141487178,20661609,2023461,147810,8625,425,19,1;
Matrix square P^2 (A113345) starts:
1;
2,1;
5,6,1;
19,39,10,1;
113,327,105,14,1;
966,3556,1315,203,18,1; ...
where P^2 transforms column k of P into column k+1 of P:
at k=0, [P^2]*[1,1,1,1,1,...] = [1,3,12,69,560,...];
at k=1, [P^2]*[1,3,12,69,560,...] = [1,5,35,325,3880,...].
		

Crossrefs

Cf. A113341 (column 1), A113342 (column 2), A113343 (column 3), A113344 (column 4); A113345 (P^2), A113360 (P^3), A113350 (Q).

Programs

  • PARI
    P(n,k)=local(A,B);A=matrix(1,1);A[1,1]=1;for(m=2,n+1,B=matrix(m,m); for(i=1,m, for(j=1,i,if(i<3 || j==i || j>m-1,B[i,j]=1,if(j==1, B[i,1]=1,B[i,j]=(A^(2*j-1))[i-j+1,1]));));A=B);A[n+1,k+1]

Formula

Let [P^m]_k denote column k of matrix power P^m,
so that triangular matrix P may be defined by
[P]_k = [P^(2*k+1)]_0, for k>=0.
Define the dual triangular matrix Q = A113350 by
[Q]_k = [P^(2*k+2)]_0, for k>=0.
Then, amazingly, powers of P and Q satisfy:
[P^(2*j+1)]_k = [P^(2*k+1)]_j,
[P^(2*j+2)]_k = [Q^(2*k+1)]_j,
[Q^(2*j+2)]_k = [Q^(2*k+2)]_j,
for all j>=0, k>=0.
Also, we have the column transformations:
P^2 * [P]k = [P]{k+1},
P^2 * [Q]k = [Q]{k+1},
Q^2 * [P^2]k = [P^2]{k+1},
Q^2 * [Q^2]k = [Q^2]{k+1},
for all k>=0.
Further, g.f.s of P and Q satisfy:
GF(P) = 1/(1-x) + x*y*GF(Q^2*P^-1),
GF(Q^-1*P^2) = 1 + x*y*GF(Q).

A113341 Column 1 of triangle A113340, also equals column 0 of A113340^3.

Original entry on oeis.org

1, 3, 12, 69, 560, 6059, 83215, 1399161, 28020221, 654110586, 17494347067, 528556017365, 17830841841940, 665126088764191, 27208111182653865, 1211942062741823574, 58424831462907214924, 3031993693950136247986
Offset: 0

Views

Author

Paul D. Hanna, Nov 08 2005

Keywords

Crossrefs

Cf. A113342 (column 2), A113343 (column 3), A113344 (column 4), A113340, A113360 (=A113340^3).

Programs

  • PARI
    a(n)=local(A,B);A=matrix(1,1);A[1,1]=1;for(m=2,n+2,B=matrix(m,m); for(i=1,m, for(j=1,i,if(i<3 || j==i || j>m-1,B[i,j]=1,if(j==1, B[i,1]=1,B[i,j]=(A^(2*j-1))[i-j+1,1]));));A=B);A[n+2,2]

A113342 Column 2 of triangle A113340, also equals column 0 of A113340^5.

Original entry on oeis.org

1, 5, 35, 325, 3880, 57560, 1030751, 21763632, 531604250, 14789895891, 462672349092, 16100666809097, 617634167482824, 25916099832677757, 1181568927574816310, 58194225186901919790, 3080529680131892318877
Offset: 0

Views

Author

Paul D. Hanna, Nov 08 2005

Keywords

Crossrefs

Cf. A113341 (column 1), A113343 (column 3), A113344 (column 4), A113340.

Programs

  • PARI
    a(n)=local(A,B);A=matrix(1,1);A[1,1]=1;for(m=2,n+3,B=matrix(m,m); for(i=1,m, for(j=1,i,if(i<3 || j==i || j>m-1,B[i,j]=1,if(j==1, B[i,1]=1,B[i,j]=(A^(2*j-1))[i-j+1,1]));));A=B);A[n+3,3]

A113344 Column 4 of triangle A113340, also equals column 0 of A113340^9.

Original entry on oeis.org

1, 9, 117, 1881, 36051, 805875, 20661609, 599319747, 19443585048, 698723462022, 27583235473854, 1187660855613822, 55430739480692085, 2789074498460404927, 150571050665946174760, 8684625004973955639293, 533144024633105768180154
Offset: 0

Views

Author

Paul D. Hanna, Nov 08 2005

Keywords

Crossrefs

Cf. A113341 (column 1), A113342 (column 2), A113343 (column 3), A113340.

Programs

  • PARI
    a(n)=local(A,B);A=matrix(1,1);A[1,1]=1;for(m=2,n+5,B=matrix(m,m); for(i=1,m, for(j=1,i,if(i<3 || j==i || j>m-1,B[i,j]=1,if(j==1, B[i,1]=1,B[i,j]=(A^(2*j-1))[i-j+1,1]));));A=B);A[n+5,5]
Showing 1-4 of 4 results.