OFFSET
0,3
COMMENTS
PROG
(PARI) {a(n)=local(e_q=1+sum(j=1, n, x^j/prod(i=1, j, (q^i-1)/(q-1))), LW2_q=sqrt(serreverse(x/(e_q+x*O(x^n))^2)/x)); vecsort(Vec(polcoeff(LW2_q+x*O(x^n), n, x)*prod(i=1, n, (q^i-1)/(q-1))))[n*(n-1)/2+1]}
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Dec 07 2008
STATUS
approved