OFFSET
0,4
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for the first 100 rows, flattened
FORMULA
T(n,0) = A011782(n), T(n,1) = A049611(n), T(n,n) = A000012(n) = 1, T(n+1,n) = A016777(n), T(n+2,n) = A062708(n+1).
G.f.: (2*x^2-3*x+1)/((x^2-x)*y+4*x^2-4*x+1). - Vladimir Kruchinin, Apr 21 2015
T(n,k) = Sum_{m=0..n} C(m+k,2*k)*C(n-1,n-m). - Vladimir Kruchinin, Apr 21 2015
EXAMPLE
Triangle begins:
1;
1, 1;
2, 4, 1;
4, 13, 7, 1;
8, 38, 33, 10, 1;
16, 104, 129, 62, 13, 1;
32, 272, 450, 304, 100, 16, 1;
64, 688, 1452, 1289, 590, 147, 19, 1;
MATHEMATICA
CoefficientList[CoefficientList[Series[(2*x^2-3*x+1)/((x^2-x)*y +4*x^2 - 4*x+1), {x, 0, 20}, {y, 0, 20}], x], y]//Flatten (* G. C. Greubel, Apr 19 2018 *)
PROG
(Maxima)
T(n, k):=sum(binomial(m+k, 2*k)*binomial(n-1, n-m), m, 0, n); /* Vladimir Kruchinin, Apr 21 2015 */
(PARI) for(n=0, 20, for(k=0, n, print1(sum(m=0, n, binomial(m+k, 2*k)* binomial(n-1, n-m)), ", "))) \\ G. C. Greubel, Apr 19 2018
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Philippe Deléham, Jan 26 2014
STATUS
approved