OFFSET
1,5
COMMENTS
EXAMPLE
a(5) counts these 3 partitions: [4,1], [2,2,1], [2,1,1,1].
MATHEMATICA
Table[Count[IntegerPartitions[n], q_ /; EvenQ[Min[q]] && OddQ[Max[q]]], {n, 30}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Apr 23 2019
STATUS
approved