OFFSET
1,4
MATHEMATICA
m[n_]:=Floor[(n+1)/2]; z=21;
h[n_]:=Product[Binomial[n-1, i], {i, m[n], n-1}]
Table[h[n], {n, 1, z}] (* A208653 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Mar 02 2012
EXTENSIONS
Definition corrected by Georg Fischer, Feb 01 2022
STATUS
approved