OFFSET
0,4
LINKS
P. Flajolet and R. Sedgewick, Analytic Combinatorics, 2009; see page 213.
FORMULA
O.g.f. for column k: 1/k!*(d/dy)^k y*B(y*x)|y=1 where B(x) is the o.g.f. for A000108.
From Vladimir Kruchinin, Oct 16 2020: (Start)
O.g.f.: (1-sqrt(-4*x*y-4*x+1))/(2*x).
T(n,m) = C(n+m,n)*C(2*n+1,n+m)/(2*n+1).
(End)
EXAMPLE
Taylor series starts: (y + 1) + x*(y + 1)^2 + 2*x^2*(y + 1)^3 + 5*x^3*(y + 1)^4 + 14*x^4*(y + 1)^5 + ...
Triangle T(n, k) begins:
1, 1;
1, 2, 1;
2, 6, 6, 2;
5, 20, 30, 20, 5;
14, 70, 140, 140, 70, 14;
42, 252, 630, 840, 630, 252, 42;
...
MATHEMATICA
nn = 5; b[z_] := (1 - Sqrt[1 - 4 z])/(2 z); Map[Select[#, # > 0 &] &, Transpose[Table[CoefficientList[Series[D[v b[v z], {v, k}]/k! /. v -> 1, {z, 0, nn}], z], {k, 0, nn + 1}]]] // Grid
PROG
(Maxima)
T(n, m):=(binomial(n+m, n)*binomial(2*n+1, n+m))/(2*n+1); /* Vladimir Kruchinin, Oct 16 2020 */
(PARI) for(n=1, 8, for(k=0, n, print1(binomial(n, k)*binomial(2*n-2, n-1)/n, ", ")); print()) \\ Hugo Pfoertner, Oct 16 2020
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Geoffrey Critzer, Jul 24 2020
STATUS
approved