|
|
A325346
|
|
Number of partitions of n with even minimal and maximal parts.
|
|
4
|
|
|
0, 1, 0, 2, 0, 3, 0, 5, 1, 7, 2, 12, 5, 17, 10, 27, 18, 40, 31, 62, 52, 90, 83, 137, 131, 199, 201, 294, 304, 425, 452, 616, 665, 878, 967, 1254, 1390, 1767, 1980, 2486, 2799, 3464, 3924, 4811, 5463, 6629, 7555, 9103, 10384, 12418
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,4
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(6) counts these 3 partitions: [6], [4,2], [2,2,2].
|
|
MATHEMATICA
|
Table[Count[IntegerPartitions[n], q_ /; EvenQ[Max[q]] && EvenQ[Min[q]]], {n, 30}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|