OFFSET
0,1
LINKS
Muniru A Asiru, Rows n = 0..150 of triangle, flattened
EXAMPLE
Triangle begins:
16;
31, 31;
57, 62, 57;
99, 119, 119, 99;
163, 218, 238, 218, 163;
MAPLE
A194122 := proc(n, k) add(binomial(n+4, k+j), j=0..4) ; end proc: # R. J. Mathar, Aug 25 2011
MATHEMATICA
T[n_, k_] := Sum[Binomial[n + 4, k + j], {j, 0, 4}]
Flatten[Table[T[n, k], {n, 0, 10}, {k, 0, n}]]
(* as a sequence *)
TableForm[Table[T[n, k], {n, 0, 10}, {k, 0, n}]]
(* as an array *)
PROG
(GAP) Flat(List([0..9], n->List([0..n], k->Sum([0..4], j->Binomial(n+4, k+j))))); # Muniru A Asiru, Mar 17 2019
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Clark Kimberling, Aug 16 2011
STATUS
approved