|
|
A325646
|
|
Number of separable partitions of n in which the number of distinct (repeatable) parts is 2.
|
|
2
|
|
|
0, 0, 1, 2, 4, 4, 7, 8, 9, 11, 13, 14, 16, 18, 18, 22, 22, 25, 25, 29, 28, 32, 31, 38, 34, 39, 38, 44, 40, 49, 43, 52, 48, 53, 50, 63, 52, 60, 58, 69, 58, 73, 61, 74, 70, 74, 67, 90, 71, 84, 78, 89, 76, 97, 82, 100, 88, 95, 85, 119
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,4
|
|
COMMENTS
|
A partition is separable if there is an ordering of its parts in which no consecutive parts are identical. See A325534 for a guide to related sequences.
|
|
LINKS
|
|
|
EXAMPLE
|
a(6) counts these 4 partitions: [5,1], [4,2], [1,4,1], [2,1,2,1].
|
|
MATHEMATICA
|
(separable=Table[Map[# [[1]]&, Select[Map[{#, Quotient[(1+Length[#]), Max[Map[Length, Split[#]]]]}&, IntegerPartitions[nn]], #[[2]]>1&]], {nn, 35}]);
Map[Length[Select[Map[{#, Length[Union[#]]}&, #], #[[2]]==2&]]&, separable]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|