OFFSET
1,3
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..41
MATHEMATICA
PROG
(Magma)
A203433:= func< n | n eq 1 select 1 else (&*[(&*[k-j+Floor(k/2)-Floor(j/2): j in [0..k-1]]) : k in [1..n-1]]) >;
[A203433(n): n in [1..25]]; // G. C. Greubel, Sep 20 2023
(SageMath)
def A203433(n): return product(product(k-j+(k//2)-(j//2) for j in range(k)) for k in range(1, n))
[A203433(n) for n in range(1, 31)] # G. C. Greubel, Sep 20 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 02 2012
STATUS
approved