OFFSET
0,3
COMMENTS
Row sums are A000346.
LINKS
Roger L. Bagula, a225419nb.txt
EXAMPLE
Triangle begins:
1,
1, 4,
1, 6, 15,
1, 8, 28, 56,
1, 10, 45, 120, 210,
1, 12, 66, 220, 495, 792,
1, 14, 91, 364, 1001, 2002, 3003,
...
MATHEMATICA
Flatten[Table[Table[DifferenceRoot[Function[{y, n}, {(-(2*m + 1) + n) y[n] + n y[1 + n] == 0, y[1] == 1}]][k], {k, 1, m}], {m, 1, 10}]]
Flatten[Table[Binomial[2n+2, k], {n, 0, 10}, {k, 0, n}]] (* Harvey P. Dale, Apr 13 2014 *)
CROSSREFS
KEYWORD
AUTHOR
Roger L. Bagula, May 07 2013
EXTENSIONS
Edited by N. J. A. Sloane, May 11 2013
STATUS
approved