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-6 of 6 results.

A088617 Triangle read by rows: T(n,k) = C(n+k,n)*C(n,k)/(k+1), for n >= 0, k = 0..n.

Original entry on oeis.org

1, 1, 1, 1, 3, 2, 1, 6, 10, 5, 1, 10, 30, 35, 14, 1, 15, 70, 140, 126, 42, 1, 21, 140, 420, 630, 462, 132, 1, 28, 252, 1050, 2310, 2772, 1716, 429, 1, 36, 420, 2310, 6930, 12012, 12012, 6435, 1430, 1, 45, 660, 4620, 18018, 42042, 60060, 51480, 24310, 4862
Offset: 0

Views

Author

N. J. A. Sloane, Nov 23 2003

Keywords

Comments

Row sums: A006318 (Schroeder numbers). Essentially same as triangle A060693 transposed.
T(n,k) is number of Schroeder paths (i.e., consisting of steps U=(1,1), D=(1,-1), H=(2,0) and never going below the x-axis) from (0,0) to (2n,0), having k U's. E.g., T(2,1)=3 because we have UHD, UDH and HUD. - Emeric Deutsch, Dec 06 2003
Little Schroeder numbers A001003 have a(n) = Sum_{k=0..n} A088617(n,k)*(-1)^(n-k)*2^k. - Paul Barry, May 24 2005
Conjecture: The expected number of U's in a Schroeder n-path is asymptotically Sqrt[1/2]*n for large n. - David Callan, Jul 25 2008
T(n, k) is also the number of order-preserving and order-decreasing partial transformations (of an n-chain) of width k (width(alpha) = |Dom(alpha)|). - Abdullahi Umar, Oct 02 2008
The antidiagonals of this lower triangular matrix are the rows of A055151. - Tom Copeland, Jun 17 2015

Examples

			Triangle begins:
  [0] 1;
  [1] 1,  1;
  [2] 1,  3,   2;
  [3] 1,  6,  10,    5;
  [4] 1, 10,  30,   35,    14;
  [5] 1, 15,  70,  140,   126,    42;
  [6] 1, 21, 140,  420,   630,   462,   132;
  [7] 1, 28, 252, 1050,  2310,  2772,  1716,   429;
  [8] 1, 36, 420, 2310,  6930, 12012, 12012,  6435,  1430;
  [9] 1, 45, 660, 4620, 18018, 42042, 60060, 51480, 24310, 4862;
		

References

  • Charles Jordan, Calculus of Finite Differences, Chelsea 1965, p. 449.

Crossrefs

Programs

  • Magma
    [[Binomial(n+k,n)*Binomial(n,k)/(k+1): k in [0..n]]: n in [0.. 15]]; // Vincenzo Librandi, Jun 18 2015
    
  • Maple
    R := n -> simplify(hypergeom([-n, n + 1], [2], -x)):
    Trow := n -> seq(coeff(R(n, x), x, k), k = 0..n):
    seq(print(Trow(n)), n = 0..9); # Peter Luschny, Apr 26 2022
  • Mathematica
    Table[Binomial[n+k, n] Binomial[n, k]/(k+1), {n,0,10}, {k,0,n}]//Flatten (* Michael De Vlieger, Aug 10 2017 *)
  • PARI
    {T(n, k)= if(k+1, binomial(n+k, n)*binomial(n, k)/(k+1))}
    
  • SageMath
    flatten([[binomial(n+k, 2*k)*catalan_number(k) for k in (0..n)] for n in (0..12)]) # G. C. Greubel, May 22 2022

Formula

Triangle T(n, k) read by rows; given by [1, 0, 1, 0, 1, 0, 1, 0, 1, 0, ...] DELTA [1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, ...] where DELTA is Deléham's operator defined in A084938.
T(n, k) = A085478(n, k)*A000108(k); A000108 = Catalan numbers. - Philippe Deléham, Dec 05 2003
Sum_{k=0..n} T(n, k)*x^k*(1-x)^(n-k) = A000108(n), A001003(n), A007564(n), A059231(n), A078009(n), A078018(n), A081178(n), A082147(n), A082181(n), A082148(n), A082173(n) for x = 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11. - Philippe Deléham, Aug 18 2005
Sum_{k=0..n} T(n,k)*x^k = (-1)^n*A107841(n), A080243(n), A000007(n), A000012(n), A006318(n), A103210(n), A103211(n), A133305(n), A133306(n), A133307(n), A133308(n), A133309(n) for x = -3, -2, -1, 0, 1, 2, 3, 4, 5, 6, 7, 8 respectively. - Philippe Deléham, Oct 18 2007
O.g.f. (with initial 1 excluded) is the series reversion with respect to x of (1-t*x)*x/(1+x). Cf. A062991 and A089434. - Peter Bala, Jul 31 2012
G.f.: 1 + (1 - x - T(0))/y, where T(k) = 1 - x*(1+y)/( 1 - x*y/T(k+1) ); (continued fraction). - Sergei N. Gladkovskii, Nov 03 2013
From Peter Bala, Jul 20 2015: (Start)
O.g.f. A(x,t) = ( 1 - x - sqrt((1 - x)^2 - 4*x*t) )/(2*x*t) = 1 + (1 + t)*x + (1 + 3*t + 2*t^2)*x^2 + ....
1 + x*(dA(x,t)/dx)/A(x,t) = 1 + (1 + t)*x + (1 + 4*t + 3*t^2)*x^2 + ... is the o.g.f. for A123160.
For n >= 1, the n-th row polynomial equals (1 + t)/(n+1)*Jacobi_P(n-1,1,1,2*t+1). Removing a factor of 1 + t from the row polynomials gives the row polynomials of A033282. (End)
From Tom Copeland, Jan 22 2016: (Start)
The o.g.f. G(x,t) = {1 - (2t+1) x - sqrt[1 - (2t+1) 2x + x^2]}/2x = (t + t^2) x + (t + 3t^2 + 2t^3) x^2 + (t + 6t^2 + 10t^3 + 5t^3) x^3 + ... generating shifted rows of this entry, excluding the first, was given in my 2008 formulas for A033282 with an o.g.f. f1(x,t) = G(x,t)/(1+t) for A033282. Simple transformations presented there of f1(x,t) are related to A060693 and A001263, the Narayana numbers. See also A086810.
The inverse of G(x,t) is essentially given in A033282 by x1, the inverse of f1(x,t): Ginv(x,t) = x [1/(t+x) - 1/(1+t+x)] = [((1+t) - t) / (t(1+t))] x - [((1+t)^2 - t^2) / (t(1+t))^2] x^2 + [((1+t)^3 - t^3) / (t(1+t))^3] x^3 - ... . The coefficients in t of Ginv(xt,t) are the o.g.f.s of the diagonals of the Pascal triangle A007318 with signed rows and an extra initial column of ones. The numerators give the row o.g.f.s of signed A074909.
Rows of A088617 are shifted columns of A107131, whose reversed rows are the Motzkin polynomials of A055151, related to A011973. The diagonals of A055151 give the rows of A088671, and the antidiagonals (top to bottom) of A088617 give the rows of A107131 and reversed rows of A055151. The diagonals of A107131 give the columns of A055151. The antidiagonals of A088617 (bottom to top) give the rows of A055151.
(End)
T(n, k) = [x^k] hypergeom([-n, 1 + n], [2], -x). - Peter Luschny, Apr 26 2022

A060693 Triangle (0 <= k <= n) read by rows: T(n, k) is the number of Schröder paths from (0,0) to (2n,0) having k peaks.

Original entry on oeis.org

1, 1, 1, 2, 3, 1, 5, 10, 6, 1, 14, 35, 30, 10, 1, 42, 126, 140, 70, 15, 1, 132, 462, 630, 420, 140, 21, 1, 429, 1716, 2772, 2310, 1050, 252, 28, 1, 1430, 6435, 12012, 12012, 6930, 2310, 420, 36, 1, 4862, 24310, 51480, 60060, 42042, 18018, 4620, 660, 45, 1, 16796
Offset: 0

Views

Author

F. Chapoton, Apr 20 2001

Keywords

Comments

The rows sum to A006318 (Schroeder numbers), the left column is A000108 (Catalan numbers); the next-to-left column is A001700, the alternating sum in each row but the first is 0.
T(n,k) is the number of Schroeder paths (i.e., consisting of steps U=(1,1), D=(1,-1), H=(2,0) and never going below the x-axis) from (0,0) to (2n,0), having k peaks. Example: T(2,1)=3 because we have UU*DD, U*DH and HU*D, the peaks being shown by *. E.g., T(n,k) = binomial(n,k)*binomial(2n-k,n-1)/n for n>0. - Emeric Deutsch, Dec 06 2003
A090181*A007318 as infinite lower triangular matrices. - Philippe Deléham, Oct 14 2008
T(n,k) is also the number of rooted plane trees with maximal degree 3 and k vertices of degree 2 (a node may have at most 2 children, and there are exactly k nodes with 1 child). Equivalently, T(n,k) is the number of syntactically different expressions that can be formed that use a unary operation k times, a binary operation n-k times, and nothing else (sequence of operands is fixed). - Lars Hellstrom (Lars.Hellstrom(AT)residenset.net), Dec 08 2009

Examples

			Triangle begins:
00: [    1]
01: [    1,     1]
02: [    2,     3,      1]
03: [    5,    10,      6,      1]
04: [   14,    35,     30,     10,      1]
05: [   42,   126,    140,     70,     15,      1]
06: [  132,   462,    630,    420,    140,     21,     1]
07: [  429,  1716,   2772,   2310,   1050,    252,    28,    1]
08: [ 1430,  6435,  12012,  12012,   6930,   2310,   420,   36,   1]
09: [ 4862, 24310,  51480,  60060,  42042,  18018,  4620,  660,  45,  1]
10: [16796, 92378, 218790, 291720, 240240, 126126, 42042, 8580, 990, 55, 1]
...
		

Crossrefs

Triangle in A088617 transposed.
T(2n,n) gives A007004.

Programs

  • Maple
    A060693 := (n,k) -> binomial(n,k)*binomial(2*n-k,n)/(n-k+1); # Peter Luschny, May 17 2011
  • Mathematica
    t[n_, k_] := Binomial[n, k]*Binomial[2 n - k, n]/(n - k + 1); Flatten[Table[t[n, k], {n, 0, 9}, {k, 0, n}]] (* Robert G. Wilson v, May 30 2011 *)
  • PARI
    T(n, k) = binomial(n, k)*binomial(2*n - k, n)/(n - k + 1);
    for(n=0, 10, for(k=0, n, print1(T(n, k),", ")); print); \\ Indranil Ghosh, Jul 28 2017
    
  • Python
    from sympy import binomial
    def T(n, k): return binomial(n, k) * binomial(2 * n - k, n) / (n - k + 1)
    for n in range(11): print([T(n, k) for k in range(n + 1)])  # Indranil Ghosh, Jul 28 2017

Formula

Triangle T(n, k) (0 <= k <= n) read by rows; given by [1, 1, 1, 1, 1, ...] DELTA [1, 0, 1, 0, 1, 0, ...] where DELTA is the operator defined in A084938. - Philippe Deléham, Aug 12 2003
If C_n(x) is the g.f. of row n of the Narayana numbers (A001263), C_n(x) = Sum_{k=1..n} binomial(n,k-1)*(binomial(n-1,k-1)/k) * x^k and T_n(x) is the g.f. of row n of T(n,k), then T_n(x) = C_n(x+1), or T(n,k) = [x^n]Sum_{k=1..n}(A001263(n,k)*(x+1)^k). - Mitch Harris, Jan 16 2007, Jan 31 2007
G.f.: (1 - t*y - sqrt((1-y*t)^2 - 4*y)) / 2.
T(n, k) = binomial(2n-k, n)*binomial(n, k)/(n-k+1). - Philippe Deléham, Dec 07 2003
A060693(n, k) = binomial(2*n-k, k)*A000108(n-k); A000108: Catalan numbers. - Philippe Deléham, Dec 30 2003
Sum_{k=0..n} T(n,k)*x^k = A000007(n), A000108(n), A006318(n), A047891(n+1), A082298(n), A082301(n), A082302(n), A082305(n), A082366(n), A082367(n), for x = -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, respectively. - Philippe Deléham, Apr 01 2007
T(n,k) = Sum_{j>=0} A090181(n,j)*binomial(j,k). - Philippe Deléham, May 04 2007
Sum_{k=0..n} T(n,k)*x^(n-k) = (-1)^n*A107841(n), A080243(n), A000007(n), A000012(n), A006318(n), A103210(n), A103211(n), A133305(n), A133306(n), A133307(n), A133308(n), A133309(n) for x = -3, -2, -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, respectively. - Philippe Deléham, Oct 18 2007
From Paul Barry, Jan 29 2009: (Start)
G.f.: 1/(1-xy-x/(1-xy-x/(1-xy-x/(1-xy-x/(1-xy-x/(1-.... (continued fraction);
G.f.: 1/(1-(x+xy)/(1-x/(1-(x+xy)/(1-x/(1-(x+xy)/(1-.... (continued fraction). (End)
T(n,k) = [k<=n]*(Sum_{j=0..n} binomial(n,j)^2*binomial(j,k))/(n-k+1). - Paul Barry, May 28 2009
T(n,k) = A104684(n,k)/(n-k+1). - Peter Luschny, May 17 2011
From Tom Copeland, Sep 21 2011: (Start)
With F(x,t) = (1-(2+t)*x-sqrt(1-2*(2+t)*x+(t*x)^2))/(2*x) an o.g.f. (nulling the n=0 term) in x for the A060693 polynomials in t,
G(x,t) = x/(1+t+(2+t)*x+x^2) is the compositional inverse in x.
Consequently, with H(x,t) = 1/(dG(x,t)/dx) = (1+t+(2+t)*x+x^2)^2 / (1+t-x^2), the n-th A060693 polynomial in t is given by (1/n!)*((H(x,t)*d/dx)^n) x evaluated at x=0, i.e., F(x,t) = exp(x*H(u,t)*d/d) u, evaluated at u = 0.
Also, dF(x,t)/dx = H(F(x,t),t). (End)
See my 2008 formulas in A033282 to relate this entry to A088617, A001263, A086810, and other matrices. - Tom Copeland, Jan 22 2016
Rows of this entry are non-vanishing antidiagonals of A097610. See p. 14 of Agapito et al. for a bivariate generating function and its inverse. - Tom Copeland, Feb 03 2016
From Werner Schulte, Jan 09 2017: (Start)
T(n,k) = A126216(n,k-1) + A126216(n,k) for 0 < k < n;
Sum_{k=0..n} (-1)^k*(1+x*(n-k))*T(n,k) = x + (1-x)*A000007(n).
(End)
Conjecture: Sum_{k=0..n} (-1)^k*T(n,k)*(n+1-k)^2 = 1+n+n^2. - Werner Schulte, Jan 11 2017

Extensions

More terms from Vladeta Jovovic, Apr 21 2001
New description from Philippe Deléham, Aug 12 2003
New name using a comment by Emeric Deutsch from Peter Luschny, Jul 26 2017

A304336 T(n, k) = Sum_{j=0..k} (-1)^j*binomial(2*k, j)*(k - j)^(2*n)/(k!)^2, triangle read by rows, n >= 0 and 0 <= k <= n.

Original entry on oeis.org

1, 0, 1, 0, 1, 3, 0, 1, 15, 10, 0, 1, 63, 140, 35, 0, 1, 255, 1470, 1050, 126, 0, 1, 1023, 14080, 21945, 6930, 462, 0, 1, 4095, 130130, 400400, 252252, 42042, 1716, 0, 1, 16383, 1184820, 6861855, 7747740, 2438436, 240240, 6435
Offset: 0

Views

Author

Peter Luschny, May 11 2018

Keywords

Examples

			Triangle starts:
[0] 1;
[1] 0, 1;
[2] 0, 1,     3;
[3] 0, 1,    15,      10;
[4] 0, 1,    63,     140,      35;
[5] 0, 1,   255,    1470,    1050,     126;
[6] 0, 1,  1023,   14080,   21945,    6930,     462;
[7] 0, 1,  4095,  130130,  400400,  252252,   42042,   1716;
[8] 0, 1, 16383, 1184820, 6861855, 7747740, 2438436, 240240, 6435;
		

Crossrefs

Row sums are A304338, T(n,n) = A088218 and A001700, T(n,n-1) ~ A002803, T(n,2) ~ A024036, T(n,3) ~ bisection of A174395.

Programs

  • Maple
    A304336 := (n, k) -> add((-1)^j*binomial(2*k,j)*(k-j)^(2*n), j=0..k)/(k!)^2:
    for n from 0 to 8 do seq(A304336(n, k), k=0..n) od;
  • PARI
    T(n, k) = sum(j=0, k, (-1)^j*binomial(2*k, j)*(k - j)^(2*n))/(k!)^2;
    tabl(nn) = for (n=0, nn, for (k=0, n, print1(T(n,k), ", ")); print); \\ Michel Marcus, May 11 2018

Formula

T(n, k) = A304330(n, k)/(k!)^2.
T(n, k) = A304334(n, k)/k!.

A342982 Triangle read by rows: T(n,k) is the number of tree-rooted planar maps with n edges and k+1 faces, n >= 0, k = 0..n.

Original entry on oeis.org

1, 1, 1, 2, 6, 2, 5, 30, 30, 5, 14, 140, 280, 140, 14, 42, 630, 2100, 2100, 630, 42, 132, 2772, 13860, 23100, 13860, 2772, 132, 429, 12012, 84084, 210210, 210210, 84084, 12012, 429, 1430, 51480, 480480, 1681680, 2522520, 1681680, 480480, 51480, 1430
Offset: 0

Views

Author

Andrew Howroyd, Apr 03 2021

Keywords

Comments

The number of vertices is n + 1 - k.
A tree-rooted planar map is a planar map with a distinguished spanning tree.

Examples

			Triangle begins:
    1;
    1,     1;
    2,     6,     2;
    5,    30,    30,      5;
   14,   140,   280,    140,     14;
   42,   630,  2100,   2100,    630,    42;
  132,  2772, 13860,  23100,  13860,  2772,   132;
  429, 12012, 84084, 210210, 210210, 84084, 12012, 429;
  ...
		

Crossrefs

Columns k=0..2 are A000108, A002457, 2*A002803.
Row sums are A005568.
Central coefficients are A342983.

Programs

  • Mathematica
    Table[(2 n)!/(k!*(k + 1)!*(n - k)!*(n - k + 1)!), {n, 0, 8}, {k, 0, n}] // Flatten (* Michael De Vlieger, Apr 06 2021 *)
  • PARI
    T(n,k) = {(2*n)!/(k!*(k+1)!*(n-k)!*(n-k+1)!)}
    { for(n=0, 10, print(vector(n+1, k, T(n,k-1)))) }

Formula

T(n,k) = (2*n)!/(k!*(k+1)!*(n-k)!*(n-k+1)!).
T(n,n-k) = T(n,k).
T(n, floor(n/2)) = A215288(n).
T(n,k) = A000108(n) * A001263(n+1,k+1). - Werner Schulte, Apr 04 2021

A121547 Fourth slice along the 1-2-plane in the cube a(m,n,o) = a(m-1,n,o) + a(m,n-1,o) + a(m,n,o-1) for which the first slice is Pascal's triangle (slice read by antidiagonals).

Original entry on oeis.org

0, 0, 1, 0, 4, 4, 0, 10, 20, 10, 0, 20, 60, 60, 20, 0, 35, 140, 210, 140, 35, 0, 56, 280, 560, 560, 280, 56, 0, 84, 504, 1260, 1680, 1260, 504, 84, 0, 120, 840, 2520, 4200, 4200, 2520, 840, 120, 0, 165, 1320, 4620, 9240, 11550, 9240, 4620, 1320, 165, 0, 220, 1980, 7920, 18480, 27720, 27720, 18480, 7920, 1980, 220
Offset: 0

Views

Author

Thomas Wieder, Aug 06 2006

Keywords

Comments

Essentially the same as triangle A178820 with an additional column of zeros at the left border. - Georg Fischer, Jul 31 2023

Examples

			The second row is 1, 4, 10, 20, 35, 56, 84, 120, 165, 220 = A000292, i.e., Tetrahedral (or pyramidal) numbers: binomial(n+2,3) = n(n+1)(n+2)/6 (core).
The third row is 4, 20, 60, 140, 280, 504, 840, 1320, 1980, 2860 = A033488 = n*(n+1)*(n+2)*(n+3)/6.
The main diagonal is 0, 4, 60, 560, 4200, 27720, 168168, 960960, 5250960, 27713400 = {0} U A002803*4.
Triangle starts:
  0
  0, 1
  0, 4, 4
  0, 10, 20, 10
  0, 20, 60, 60, 20
  0, 35, 140, 210, 140, 35
  0, 56, 280, 560, 560, 280, 56
  0, 84, 504, 1260, 1680, 1260, 504, 84
		

Crossrefs

Programs

  • Maple
    T:=(n, k)->binomial(n+3, 3)*binomial(n, k): seq(print(seq(T(n-1, k-1), k=0..n)), n=0..10); # Georg Fischer, Jul 31 2023

Formula

a(m-1,n,o) + a(m,n-1,o) + a(m,n,o-1) with initialization values a(1,0,0) = 1 and a(m<>1=0, n>=0, 0>=o) = 0.

Extensions

a(55)-a(56) corrected and more terms from Georg Fischer, Jul 31 2023

A106440 a(n) = binomial(2n+4,n)*binomial(n+4,4).

Original entry on oeis.org

1, 30, 420, 4200, 34650, 252252, 1681680, 10501920, 62355150, 355655300, 1963217256, 10546208400, 55367594100, 285028443000, 1442592936000, 7193730107520, 35406640372950, 172255143129300, 829376615067000
Offset: 0

Views

Author

Paul Barry, May 02 2005

Keywords

Comments

Fifth column of A104684.
Diagonal of the rational function 1 / (1 - x - y)^5. - Ilya Gutkovskiy, Apr 24 2025

Crossrefs

Programs

  • Mathematica
    Table[Binomial[2n+4,n]Binomial[n+4,4],{n,0,20}] (* Harvey P. Dale, May 03 2019 *)

Formula

G.f.: (1+12x+6x^2)/(1-4x)^(9/2).
D-finite with recurrence n^2*a(n) -2*(n+2)*(2*n+3)*a(n-1)=0. - R. J. Mathar, Feb 20 2015
G.f.: 2F1(5/2,3;1;4x). - R. J. Mathar, Aug 09 2015
a(n) = A020920(n)+12*A020920(n-1)+6*A020920(n-2). - R. J. Mathar, Aug 09 2015
a(n) = (n+1)*A002803(n). - R. J. Mathar, Aug 09 2015
Showing 1-6 of 6 results.