OFFSET
0,7
COMMENTS
It appears that positive terms give column 3 of triangle A210945. - Omar E. Pol, May 18 2012
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000
FORMULA
G.f. for number of partitions of n such that if k is the largest part, then k-m occurs as a part is Sum(x^(2*i-m)/Product(1-x^j, j=1..i), i=m+1..infinity).
It appears that a(n) = (A000041(n+2) - A000041(n+1)) - (A002620(n+2) - A002620(n+1)). - Gionata Neri, Apr 12 2015
MAPLE
b:= proc(n, i) option remember;
`if`(n=0 or i=1, 1, b(n, i-1)+`if`(i>n, 0, b(n-i, i)))
end:
a:= n-> add(b(n-(2*k-2), k), k=3..1+n/2):
seq(a(n), n=0..60); # Alois P. Heinz, May 18 2012
MATHEMATICA
b[n_, i_] := b[n, i] = If[n==0 || i==1, 1, b[n, i-1] + If[i>n, 0, b[n-i, i]]]; a[n_] := Sum[b[n-(2*k-2), k], {k, 3, 1+n/2}]; Table[a[n], {n, 0, 60}] (* Jean-François Alcover, Jul 01 2015, after Alois P. Heinz *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Vladeta Jovovic, Aug 02 2006
EXTENSIONS
More terms from Joshua Zucker, Aug 14 2006
STATUS
approved