OFFSET
1,2
FORMULA
MAPLE
read(PARTITIONS): # See the Sills & Zeilberger paper cited in A375252.
seq(denom(op(pmnPC(n, x)[1])), n = 1..17);
# Or, standalone:
W := proc(n) local k; exp(t*x)/mul(1 - exp(-t*k), k=1..n);
expand(series(%, t, n+1)); coeff(%, t, -1) end:
a := n -> denom(W(n)): seq(a(n), n = 1..17);
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
Peter Luschny, Aug 07 2024
STATUS
approved