OFFSET
1,1
COMMENTS
Numbers k such that number of partitions of k into distinct parts with even rank equals number of partitions of k into distinct parts with odd rank (the rank of a partition is its largest part minus the number of parts).
MATHEMATICA
Flatten[Position[nmax = 150; Rest[CoefficientList[Series[Sum[x^(i (i + 1)/2)/Product[(1 + x^j), {j, 1, i}], {i, 0, nmax}], {x, 0, nmax}], x]], 0]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 10 2018
STATUS
approved