login
A375108
Expansion of Sum_{k in Z} x^(3*k) / (1 - x^(7*k+3)).
3
1, -1, 0, 2, 0, -2, 2, 0, 0, 0, 0, 0, 2, -1, 0, 2, -1, -2, 2, 0, 0, 0, 0, 2, 2, -2, 0, 0, 0, -2, 2, 0, 0, 2, 0, 0, 2, -2, -2, 2, 1, -2, 2, 2, 0, -1, 0, 0, 2, -4, 0, 2, 0, 0, 2, 0, 0, 2, 0, 0, 0, -2, 0, 2, 0, -2, 2, 0, 0, 0, 0, -2, 2, 0, 2, 2, 0, -2, 2, 0, 0, -1, -2, 2, 2, -2, 0, 2, -1, -2, 2, 2, 0, 0, 0
OFFSET
0,4
LINKS
R. P. Agarwal, Lambert series and Ramanujan, Prod. Indian Acad. Sci. (Math. Sci.), v. 103, n. 3, 1993, pp. 269-293. see p. 286.
FORMULA
G.f.: Product_{k>0} (1-x^(7*k))^2 * (1-x^(7*k-1)) * (1-x^(7*k-6)) / ((1-x^(7*k-3)) * (1-x^(7*k-4)))^2.
PROG
(PARI) my(N=100, x='x+O('x^N)); Vec(sum(k=-N, N, x^(3*k)/(1-x^(7*k+3))))
(PARI) my(N=100, x='x+O('x^N)); Vec(prod(k=1, N, (1-x^(7*k))^2*(1-x^(7*k-1))*(1-x^(7*k-6))/((1-x^(7*k-3))*(1-x^(7*k-4)))^2))
CROSSREFS
Sequence in context: A298141 A160210 A174610 * A373924 A028928 A343723
KEYWORD
sign
AUTHOR
Seiichi Manyama, Jul 30 2024
STATUS
approved