OFFSET
1,2
COMMENTS
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..10000
EXAMPLE
For n = 15 there are four partitions of 15 into consecutive parts: [15], [8, 7], [6, 5, 4] and [5, 4, 3, 2, 1]. The sum of the smallest parts is 15 + 7 + 4 + 1 = 27, so a(15) = 27.
MATHEMATICA
Table[Total[Select[IntegerPartitions@ n, Or[Length@ # == 1, Union@ Differences@ # == {-1}] &][[All, -1]]], {n, 66}] (* Michael De Vlieger, Jul 21 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Omar E. Pol, Apr 30 2017
EXTENSIONS
More terms from Alois P. Heinz, May 01 2017
STATUS
approved