A361979 Expansion of 1 / Sum_{k>=0} x^(k*(2*k - 1)).

1, -1, 1, -1, 1, -1, 0, 1, -2, 3, -4, 5, -5, 4, -2, -2, 7, -13, 19, -24, 27, -25, 17, -2, -20, 48, -80, 110, -132, 137, -116, 62, 30, -158, 314, -479, 622, -704, 680, -507, 150, 405, -1135, 1973, -2797, 3432, -3662, 3250, -1983, -280, 3540, -7592, 11977, -15953

Offset

0,9

Links

Table of n, a(n) for n=0..53.

Mathematica

nmax = 53; CoefficientList[Series[1/Sum[x^(k (2 k - 1)), {k, 0, nmax}], {x, 0, nmax}], x]

Crossrefs

Cf. A000384, A006950, A106507, A308806, A317665, A322798, A363149, A363275.

Sequence in context: A289321 A301534 A101916 * A329267 A100771 A234470

Adjacent sequences: A361976 A361977 A361978 * A361980 A361981 A361982

Keyword

sign

Author

Ilya Gutkovskiy, May 25 2023

Status

approved