OFFSET
0,2
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..10000 (terms 0..1000 from Alois P. Heinz)
MAPLE
a:= proc(n) option remember; `if`(n=0, 1, add(
numtheory[sigma](j)*a(n-j), j=1..n)*48/n)
end:
seq(a(n), n=0..25); # Alois P. Heinz, Mar 12 2015
MATHEMATICA
CoefficientList[1/QPochhammer[x]^48 + O[x]^100, x] (* Jean-François Alcover, Feb 04 2024 *)
PROG
(PARI) Vec(1/eta(x)^48 + O(x^30)) \\ Michel Marcus, Sep 17 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, May 04 2003
STATUS
approved