OFFSET
0,8
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..1000
FORMULA
G.f.: Sum_{k>=0} x^(5*k)/Product_{j=1..5*k} (1-x^j).
a(n) ~ A000041(n)/5. - Vaclav Kotesovec, May 21 2023
MAPLE
b:= proc(n, i) option remember; `if`(n=0, 1,
`if`(i<1, 0, b(n, i-1)+b(n-i, min(n-i, i))))
end:
a:= n-> add(b(n-5*i, min(n-5*i, 5*i)), i=0..n/5):
seq(a(n), n=0..52); # Alois P. Heinz, May 14 2023
PROG
(PARI) my(N=60, x='x+O('x^N)); Vec(sum(k=0, N, x^(5*k)/prod(j=1, 5*k, 1-x^j)))
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, May 14 2023
STATUS
approved