login
A363149
Expansion of 1 / Sum_{k>=0} x^(k*(5*k - 3)/2).
2
1, -1, 1, -1, 1, -1, 1, -2, 3, -4, 5, -6, 7, -8, 10, -13, 17, -22, 27, -33, 40, -49, 61, -77, 98, -123, 153, -189, 233, -288, 358, -448, 561, -701, 872, -1082, 1342, -1666, 2073, -2584, 3223, -4016, 4997, -6212, 7720, -9598, 11942, -14869, 18517, -23053, 28687
OFFSET
0,8
MATHEMATICA
nmax = 50; CoefficientList[Series[1/Sum[x^(k (5 k - 3)/2), {k, 0, nmax}], {x, 0, nmax}], x]
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, May 25 2023
STATUS
approved