OFFSET
0,5
COMMENTS
EXAMPLE
1,
1, 1,
1, 3, 1,
1, 3, 2, 1,
1, 2, 3, 5, 1,
1, 5, 5, 5, 3, 1, etc.
MATHEMATICA
p[n_] := (1+x)*((1+x)^(n-1)+x^(n-1))/2; t[n_, k_] := Coefficient[p[n], x, k] // Numerator; Table[t[n, k], {n, 0, 10 }, {k, 0, n}] // Flatten (* Jean-François Alcover, Dec 16 2013 *)
CROSSREFS
KEYWORD
AUTHOR
Paul Curtz, Dec 11 2013
STATUS
approved