OFFSET
6,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 6..1000
G. E. Andrews, M. Beck and N. Robbins, Partitions with fixed differences between largest and smallest parts, arXiv:1406.3374 [math.NT], 2014.
FORMULA
MATHEMATICA
terms = 52; offset = 6; max = terms + offset; s[k0_ /; k0>0] := Sum[x^(2*k + k0) / Product[ (1 - x^(k+j)), {j, 0, k0}], {k, 1, Ceiling[max/2]}] + O[x]^max // CoefficientList[#, x]&; Drop[s[4], offset] (* Jean-François Alcover, Sep 11 2017, after Alois P. Heinz *)
Table[Count[IntegerPartitions[n], _?(#[[1]]-#[[-1]]==4&)], {n, 6, 60}] (* Harvey P. Dale, Jul 10 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Nov 02 2012
STATUS
approved