|
|
A114092
|
|
Number of partitions of n into parts that are distinct mod 4.
|
|
2
|
|
|
1, 1, 1, 2, 2, 3, 3, 5, 4, 6, 7, 9, 7, 10, 14, 14, 11, 15, 25, 20, 16, 21, 41, 27, 22, 28, 63, 35, 29, 36, 92, 44, 37, 45, 129, 54, 46, 55, 175, 65, 56, 66, 231, 77, 67, 78, 298, 90, 79, 91, 377, 104, 92, 105, 469, 119, 106, 120, 575, 135, 121, 136, 696, 152
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
EXAMPLE
|
a(5)=3 because there are 3 such partition of 5: {5}, {2,3}, {1,4}.
|
|
MATHEMATICA
|
<< DiscreteMath`Combinatorica`; np[n_]:= Length@Select[Mod[ #, 4]& /@ Partitions[n], (Length@# != Length@Union@#)&]; lst = Array[np, 50]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|