A238587 - OEIS

A238587

Number of partitions p of n such that 2(number of parts of p) - min(p) is a part of p.

1, 0, 0, 2, 1, 1, 2, 3, 4, 5, 6, 8, 10, 13, 15, 22, 24, 31, 39, 48, 56, 73, 84, 106, 127, 153, 181, 226, 263, 317, 377, 453, 530, 640, 745, 890, 1043, 1233, 1441, 1708, 1982, 2331, 2715, 3183, 3687, 4316, 4989, 5814, 6725, 7802, 8998, 10437, 12004, 13871

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,4

LINKS

Table of n, a(n) for n=1..54.

EXAMPLE

a(8) = 3 counts these partitions: 62, 521, 422.

MATHEMATICA

Table[Count[IntegerPartitions[n], p_ /; MemberQ[p, 2*Length[p] - Min[p]]], {n, 50}]

CROSSREFS

Cf. A238588.

Sequence in context: A090282 A022910 A030737 * A320767 A058713 A331564

Adjacent sequences: A238584 A238585 A238586 * A238588 A238589 A238590

KEYWORD

nonn,easy

AUTHOR

Clark Kimberling, Mar 01 2014

STATUS

approved