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!)
A371797 Number of quanimous subsets of {1..n} containing n, meaning there is more than one set partition with equal block-sums. 17
0, 0, 1, 2, 5, 11, 24, 51, 112, 233 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,4
COMMENTS
A finite multiset of numbers is defined to be quanimous iff it can be partitioned into two or more multisets with equal sums. Quanimous partitions are counted by A321452 and ranked by A321454.
LINKS
EXAMPLE
The set s = {3,4,6,8,9} has set partitions {{3,4,6,8,9}} and {{3,4,8},{6,9}} with equal block-sums, so s is counted under a(9).
The a(1) = 0 through a(6) = 11 subsets:
. . {1,2,3} {1,3,4} {1,4,5} {1,5,6}
{1,2,3,4} {2,3,5} {2,4,6}
{1,2,4,5} {1,2,3,6}
{2,3,4,5} {1,2,5,6}
{1,2,3,4,5} {1,3,4,6}
{2,3,5,6}
{3,4,5,6}
{1,2,3,4,6}
{1,2,4,5,6}
{2,3,4,5,6}
{1,2,3,4,5,6}
MATHEMATICA
sps[{}]:={{}}; sps[set:{i_, ___}]:=Join@@Function[s, Prepend[#, s]& /@ sps[Complement[set, s]]]/@Cases[Subsets[set], {i, ___}];
Table[Length[Select[Subsets[Range[n]], MemberQ[#, n]&&Length[Select[sps[#], SameQ@@Total/@#&]]>1&]], {n, 10}]
CROSSREFS
The "bi-" version is A232466, complement A371793.
The complement is counted by A371790.
First differences of A371796, complement A371789.
A371736 counts non-quanimous strict partitions.
A371737 counts quanimous strict partitions.
A371783 counts k-quanimous partitions.
A371791 counts biquanimous subsets, complement A371792.
Sequence in context: A336482 A134389 A286945 * A350326 A111297 A077864
KEYWORD
nonn,more
AUTHOR
Gus Wiseman, Apr 17 2024
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 June 25 23:44 EDT 2024. Contains 373715 sequences. (Running on oeis4.)