login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A284618 Number of partitions of n such that the (sum of distinct even parts) > n/2. 3
0, 1, 1, 1, 1, 3, 4, 5, 7, 13, 18, 14, 20, 33, 45, 45, 62, 92, 126, 124, 170, 240, 322, 288, 387, 530, 699, 669, 883, 1179, 1537, 1475, 1924, 2514, 3235, 3181, 4094, 5272, 6701, 6279, 7983, 10149, 12784, 12494, 15733, 19770, 24669, 23785, 29682, 36968, 45755 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,6
LINKS
EXAMPLE
a(6) counts these 3 partitions: 6, 41, 411.
MATHEMATICA
Table[p = IntegerPartitions[n];
Length[Select[Table[Total[Select[DeleteDuplicates[p[[k]]], EvenQ]], {k,
Length[p]}], # > n/2 &]], {n, 54}]
CROSSREFS
Sequence in context: A216574 A216561 A192269 * A101759 A089560 A248077
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Apr 02 2017
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 09:04 EDT 2024. Contains 371240 sequences. (Running on oeis4.)