OFFSET
0,1
LINKS
Giovanni Resta, Table of n, a(n) for n = 0..75
FORMULA
For n > 0, a(n) = Sum_{k > 0} A325227(n + k, k).
EXAMPLE
The a(0) = 1 through a(4) = 18 partitions:
() (2) (3) (4) (5)
(1) (11) (22) (32) (33)
(21) (31) (41) (42)
(111) (221) (51)
(211) (321) (222)
(311) (411) (322)
(1111) (331)
(2111) (421)
(3111) (511)
(4111) (2211)
(3211)
(4211)
(5111)
(11111)
(21111)
(31111)
(41111)
(51111)
MATHEMATICA
nn=30;
mindif[ptn_]:=If[ptn=={}, 0, Total[ptn]-Min[Length[ptn], Max[ptn]]];
allip=Array[IntegerPartitions, 2*nn+2, 0, Join];
Table[Length[Select[allip, mindif[#]==n&]], {n, 0, nn}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Apr 13 2019
EXTENSIONS
More terms from Giovanni Resta, Apr 15 2019
STATUS
approved