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