OFFSET
1,2
FORMULA
EXAMPLE
Triangle starts:
1;
3, 1;
8, 6, 1;
22, 25, 9, 1;
64, 92, 51, 12, 1;
MATHEMATICA
Flatten@ Table[k Sum[Binomial[2 i + 2 k, i] Binomial[n - i - 1, k - 1]/(i + k), {i, 0, n - k}], {n, 10}, {k, n}] (* Michael De Vlieger, Apr 27 2015 *)
PROG
(Maxima)
T(n, k):=k*sum((binomial(2*i+2*k, i)*binomial(n-i-1, k-1))/(i+k), i, 0, n-k);
(PARI) T(n, k)=k*sum(i=0, n-k, (binomial(2*i+2*k, i)*binomial(n-i-1, k-1))/(i+k))
for(n=1, 10, for(k=1, n, print1(T(n, k), ", "))) \\ Derek Orr, Apr 27 2015
CROSSREFS
KEYWORD
AUTHOR
Vladimir Kruchinin, Apr 26 2015
STATUS
approved