|
|
A371792
|
|
Number of non-biquanimous subsets of {1..n}. Sets with no subset having the same sum as the complement.
|
|
22
|
|
|
0, 1, 3, 6, 12, 24, 46, 90, 174, 337, 651, 1261, 2445, 4753, 9258, 18101
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
A finite multiset of numbers is defined to be biquanimous iff it can be partitioned into two multisets with equal sums. Biquanimous partitions are counted by A002219 and ranked by A357976.
|
|
LINKS
|
|
|
EXAMPLE
|
The subsets of S = {1,4,6,7} have distinct sums {0,1,4,5,6,7,8,10,11,12,13,14,17,18}. Since 9 is missing, S is counted under a(7).
The a(0) = 0 through a(4) = 12 subsets:
. {1} {1} {1} {1}
{2} {2} {2}
{1,2} {3} {3}
{1,2} {4}
{1,3} {1,2}
{2,3} {1,3}
{1,4}
{2,3}
{2,4}
{3,4}
{1,2,4}
{2,3,4}
|
|
MATHEMATICA
|
biqQ[y_]:=MemberQ[Total/@Subsets[y], Total[y]/2];
Table[Length[Select[Subsets[Range[n]], Not@*biqQ]], {n, 0, 10}]
|
|
CROSSREFS
|
A371781 lists numbers with biquanimous prime signature, complement A371782.
A371783 counts k-quanimous partitions.
Cf. A035470, A064914, A318434, A321455, A365543, A365661, A365663, A366320, A365381, A365925, A367094, A371788.
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|