cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Previous Showing 11-20 of 24 results. Next

A371737 Number of quanimous strict integer partitions of n, meaning there is more than one set partition with all equal block-sums.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 3, 0, 4, 0, 7, 1, 9, 0, 16, 0, 21, 4, 32, 0, 45, 0, 63, 13, 84, 0, 126, 0, 158, 36, 220, 0, 303, 0, 393, 93, 511, 0, 708, 0, 881, 229, 1156, 0, 1539, 0, 1925, 516, 2445, 0, 3233, 6, 3952, 1134, 5019, 0, 6497
Offset: 0

Views

Author

Gus Wiseman, Apr 14 2024

Keywords

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.
Conjecture: (1) Positions of 0's are A327782. (2) Positions of terms > 0 are A368459.

Examples

			The a(0) = 0 through a(14) = 7 strict partitions:
  .  .  .  .  .  .  (321)  .  (431)  .  (532)   .  (642)   .  (743)
                                        (541)      (651)      (752)
                                        (4321)     (5421)     (761)
                                                   (6321)     (5432)
                                                              (6431)
                                                              (6521)
                                                              (7421)

Crossrefs

The non-strict "bi-" version is A002219, ranks A357976.
The "bi-" version is A237258, ranks A357854, complement A321142 or A371794.
The non-strict version is A321452, ranks A321454.
The complement is A371736, non-strict A321451, ranks A321453.
The non-strict "bi-" complement is A371795, ranks A371731.
A371783 counts k-quanimous partitions.
A371791 counts biquanimous sets, complement A371792.
A371796 counts quanimous sets, complement A371789.
Cf. A000005, A018818, A035470, A038041, A064688, A232466, A237194, A305551, A365663, A365661, A365925, A371733, A371839.

Programs

  • Mathematica
    sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]& /@ sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&Length[Select[sps[#], SameQ@@Total/@#&]]>1&]],{n,0,30}]

A366754 Number of non-knapsack integer partitions of n.

Original entry on oeis.org

0, 0, 0, 0, 1, 1, 4, 4, 10, 13, 23, 27, 52, 60, 94, 118, 175, 213, 310, 373, 528, 643, 862, 1044, 1403, 1699, 2199, 2676, 3426, 4131, 5256, 6295, 7884, 9479, 11722, 14047, 17296, 20623, 25142, 29942, 36299, 43081, 51950, 61439, 73668, 87040, 103748, 122149, 145155, 170487
Offset: 0

Views

Author

Gus Wiseman, Nov 08 2023

Keywords

Comments

A multiset is non-knapsack if there exist two different submultisets with the same sum.

Examples

			The a(4) = 1 through a(9) = 13 partitions:
  (211)  (2111)  (321)    (3211)    (422)      (3321)
                 (2211)   (22111)   (431)      (4221)
                 (3111)   (31111)   (3221)     (4311)
                 (21111)  (211111)  (4211)     (5211)
                                    (22211)    (32211)
                                    (32111)    (33111)
                                    (41111)    (42111)
                                    (221111)   (222111)
                                    (311111)   (321111)
                                    (2111111)  (411111)
                                               (2211111)
                                               (3111111)
                                               (21111111)

Crossrefs

The complement is counted by A108917, strict A275972, ranks A299702.
These partitions have ranks A299729.
The strict case is A316402.
The binary version is A366753, ranks A366740.
A000041 counts integer partitions, strict A000009.
A276024 counts positive subset-sums of partitions, strict A284640.
A304792 counts subset-sum of partitions, strict A365925.
A365543 counts partitions with subset-sum k, complement A046663.
A365661 counts strict partitions with subset-sum k, complement A365663.
A366738 counts semi-sums of partitions, strict A366741.
Cf. A002033, A006827, A122768, A126796, A238628, A365923, A365924, A367095.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n], !UnsameQ@@Total/@Union[Subsets[#]]&]], {n,0,15}]

Formula

a(n) = A000041(n) - A108917(n).

A371736 Number of non-quanimous strict integer partitions of n, meaning no set partition with more than one block has all equal block-sums.

Original entry on oeis.org

1, 1, 1, 2, 2, 3, 3, 5, 5, 8, 7, 12, 11, 18, 15, 26, 23, 38, 30, 54, 43, 72, 57, 104, 77, 142, 102, 179, 138, 256, 170, 340, 232, 412, 292, 585, 365, 760, 471, 889, 602, 1260, 718, 1610, 935, 1819, 1148, 2590, 1371, 3264, 1733, 3581, 2137, 5120, 2485, 6372
Offset: 0

Views

Author

Gus Wiseman, Apr 14 2024

Keywords

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.

Examples

			The a(0) = 1 through a(9) = 8 strict partitions:
  ()  (1)  (2)  (3)   (4)   (5)   (6)   (7)    (8)    (9)
                (21)  (31)  (32)  (42)  (43)   (53)   (54)
                            (41)  (51)  (52)   (62)   (63)
                                        (61)   (71)   (72)
                                        (421)  (521)  (81)
                                                      (432)
                                                      (531)
                                                      (621)

Crossrefs

The non-strict "bi-" complement is A002219, ranks A357976.
The "bi-" version is A321142 or A371794, complement A237258, ranks A357854.
The non-strict version is A321451, ranks A321453.
The complement is A371737, non-strict A321452, ranks A321454.
The non-strict "bi-" version is A371795, ranks A371731.
A108917 counts knapsack partitions, ranks A299702, strict A275972.
A366754 counts non-knapsack partitions, ranks A299729, strict A316402.
A371783 counts k-quanimous partitions.
A371789 counts non-quanimous sets, differences A371790.
A371792 counts non-biquanimous sets, complement A371791.
A371796 counts quanimous sets, differences A371797.
Cf. A000005, A018818, A035470, A038041, A232466, A279791, A365663, A365661, A365925, A371840.

Programs

  • Mathematica
    sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]& /@ sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&Length[Select[sps[#], SameQ@@Total/@#&]]==1&]],{n,0,30}]

Formula

a(prime(k)) = A064688(k) = A000009(A000040(k)).

A365922 Number of non-subset-sums of strict integer partitions of n.

Original entry on oeis.org

0, 1, 2, 4, 8, 11, 18, 25, 38, 51, 70, 93, 122, 159, 206, 263, 328, 420, 514, 645, 776, 967, 1154, 1413, 1686, 2042, 2414, 2890, 3394, 4062, 4732, 5598, 6494, 7652, 8836, 10329, 11884, 13833, 15830, 18376, 20936, 24131, 27476, 31547, 35780, 40966, 46292, 52737
Offset: 1

Views

Author

Gus Wiseman, Sep 23 2023

Keywords

Comments

For an integer partition y of n, we call a positive integer k <= n a non-subset-sum iff there is no submultiset of y summing to k.

Examples

			The a(6) = 11 ways, showing each strict partition and its non-subset-sums:
    (6): 1,2,3,4,5
   (51): 2,3,4
   (42): 1,3,5
  (321):

Crossrefs

The complement (positive subset-sums) is A284640, non-strict A276024.
Weighted row sums of A365545, non-strict A365923.
Row sums of A365663, non-strict A046663.
The non-strict version is A365918.
The zero-full complement (subset-sums) is A365925, non-strict A304792.
A000041 counts integer partitions, strict A000009.
A126796 counts complete partitions, ranks A325781, strict A188431.
A364350 counts combination-free strict partitions, complement A364839.
A365543 counts partitions with a submultiset summing to k.
A365661 counts strict partitions w/ a subset summing to k.
A365924 counts incomplete partitions, ranks A365830, strict A365831.
Cf. A006827, A325799, A364272, A365658, A365919, A365921.

Programs

  • Mathematica
    Table[Total[Length[Complement[Range[n], Total/@Subsets[#]]]& /@ Select[IntegerPartitions[n], UnsameQ@@#&]],{n,30}]

A366753 Number of integer partitions of n without all different sums of two-element submultisets.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 3, 4, 9, 11, 22, 27, 48, 61, 98, 123, 188, 237, 345, 435, 611, 765, 1046, 1305, 1741, 2165, 2840, 3502, 4527, 5562, 7083, 8650, 10908, 13255, 16545, 20016, 24763, 29834, 36587, 43911, 53514, 63964, 77445, 92239, 111015, 131753
Offset: 0

Views

Author

Gus Wiseman, Nov 07 2023

Keywords

Examples

			The two-element submultisets of y = {1,1,1,2,2,3} are {1,1}, {1,2}, {1,3}, {2,2}, {2,3}, with sums 2, 3, 4, 4, 5, which are not all different, so y is counted under a(10).
The a(8) = 1 through a(13) = 11 partitions:
  (3221)  (32211)  (4321)    (33221)    (4332)      (43321)
                   (32221)   (43211)    (5331)      (53221)
                   (322111)  (322211)   (5421)      (53311)
                             (3221111)  (43221)     (54211)
                                        (322221)    (332221)
                                        (332211)    (432211)
                                        (432111)    (3222211)
                                        (3222111)   (3322111)
                                        (32211111)  (4321111)
                                                    (32221111)
                                                    (322111111)

Crossrefs

Semiprime divisors are counted by A086971, distinct sums A366739.
The non-binary complement is A108917, strict A275972, ranks A299702.
These partitions have ranks A366740.
The non-binary version is A366754, strict A316402, ranks A299729.
A276024 counts positive subset-sums of partitions, strict A284640.
A304792 counts subset-sum of partitions, strict A365925.
A365543 counts partitions with a subset-sum k, complement A046663.
A365661 counts strict partitions with a subset-sum k, complement A365663.
A366738 counts semi-sums of partitions, strict A366741.
A367096 lists semiprime divisors, row sums A076290.
Cf. A002033, A001358, A006827, A008967, A122768, A126796, A365923, A365924, A367093, A367095.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],!UnsameQ@@Total/@Union[Subsets[#,{2}]]&]],{n,0,30}]

A367395 Number of strict integer partitions of n whose length is the sum of two distinct parts.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 2, 2, 2, 3, 3, 5, 5, 7, 8, 11, 13, 17, 19, 25, 28, 35, 41, 49, 57, 68, 78, 92, 107, 124, 143, 166, 192, 220, 254, 291, 335, 382, 439, 499, 572, 649, 741, 840, 956, 1080, 1226, 1383, 1566, 1762, 1988, 2235, 2515, 2822, 3166, 3547
Offset: 0

Views

Author

Gus Wiseman, Nov 19 2023

Keywords

Examples

			The strict partition (5,3,2,1) has 4 = 3 + 1 so is counted under a(11).
The a(6) = 1 through a(17) = 7 strict partitions (A..E = 10..14):
  321  421  521  621  721   821   921   A21   B21   C21    D21    E21
                      4321  5321  6321  5431  6431  6531   7531   7631
                                        7321  8321  7431   8431   8531
                                                    9321   A321   9431
                                                    54321  64321  B321
                                                                  65321
                                                                  74321

Crossrefs

The following sequences count and rank integer partitions and finite sets according to whether their length is a subset-sum, linear combination, or semi-sum of the parts. The current sequence is starred.
sum-full sum-free comb-full comb-free semi-full semi-free
-----------------------------------------------------------
partitions: A367212 A367213 A367218 A367219 A367394 A367398
strict: A367214 A367215 A367220 A367221 A367395* A367399
subsets: A367216 A367217 A367222 A367223 A367396 A367400
ranks: A367224 A367225 A367226 A367227 A367397 A367401
A000041 counts partitions, strict A000009.
A002865 counts partitions whose length is a part, complement A229816.
A088809/A093971 count twofold sum-full subsets.
A236912 counts partitions containing no semi-sum, ranks A364461.
A237113 counts partitions containing a semi-sum, ranks A364462.
A237668 counts sum-full partitions, sum-free A237667.
A366738 counts semi-sums of partitions, strict A366741.
Triangles:
A008284 counts partitions by length, strict A008289.
A365541 counts subsets with a semi-sum k.
A367404 counts partitions with a semi-sum k, strict A367405.
Cf. A000700, A238628, A363225, A364272, A364534, A365661, A365925, A367410, A367411.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&MemberQ[Total/@Subsets[#,{2}], Length[#]]&]], {n,0,30}]

A367397 Numbers m such that bigomega(m) is the sum of prime indices of some semiprime divisor of m.

Original entry on oeis.org

4, 12, 18, 30, 36, 40, 42, 54, 60, 66, 78, 81, 90, 100, 102, 112, 114, 120, 126, 135, 138, 140, 150, 168, 174, 180, 186, 189, 198, 210, 220, 222, 225, 234, 246, 250, 252, 258, 260, 270, 280, 282, 297, 300, 306, 315, 318, 330, 336, 340, 342, 350, 351, 352, 354
Offset: 1

Views

Author

Gus Wiseman, Nov 21 2023

Keywords

Comments

A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
These are the Heinz numbers of the partitions counted by A367394.

Crossrefs

The following sequences count and rank integer partitions and finite sets according to whether their length is a subset-sum, linear combination, or semi-sum of the parts. The current sequence is starred.
sum-full sum-free comb-full comb-free semi-full semi-free
-----------------------------------------------------------
partitions: A367212 A367213 A367218 A367219 A367394 A367398
strict: A367214 A367215 A367220 A367221 A367395 A367399
subsets: A367216 A367217 A367222 A367223 A367396 A367400
ranks: A367224 A367225 A367226 A367227 A367397* A367401
A325761 ranks partitions whose length is a part, counted by A002865.
A088809 and A093971 count subsets containing semi-sums.
A236912 counts partitions with no semi-sum of the parts, ranks A364461.
A237113 counts partitions with a semi-sum of the parts, ranks A364462.
A304792 counts subset-sums of partitions, strict A365925.
A366738 counts semi-sums of partitions, strict A366741.
Triangles:
A365381 counts subsets with a subset summing to k, complement A366320.
A365541 counts subsets with a semi-sum k.
A367404 counts partitions with a semi-sum k, strict A367405.
Cf. A000700, A229816, A237667, A237668, A238628, A363225, A364272, A365543, A365658, A365918, A366740.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],MemberQ[Total/@Subsets[prix[#],{2}],PrimeOmega[#]]&]

A367399 Number of strict integer partitions of n whose length is not the sum of any two distinct parts.

Original entry on oeis.org

1, 1, 1, 2, 2, 3, 3, 4, 5, 7, 8, 10, 13, 15, 19, 22, 27, 31, 38, 43, 51, 59, 70, 79, 94, 107, 124, 143, 165, 188, 218, 248, 283, 324, 369, 419, 476, 540, 610, 691, 778, 878, 987, 1111, 1244, 1399, 1563, 1750, 1954, 2184, 2432, 2714, 3016, 3358, 3730, 4143
Offset: 0

Views

Author

Gus Wiseman, Nov 19 2023

Keywords

Examples

			The strict partition y = (6,4,2,1) has semi-sums {3,5,6,7,8,10}, which do not include 4, so y is counted under a(13).
The a(6) = 3 through a(13) = 15 strict partitions:
  (6)    (7)    (8)      (9)      (10)     (11)     (12)       (13)
  (4,2)  (4,3)  (5,3)    (5,4)    (6,4)    (6,5)    (7,5)      (7,6)
  (5,1)  (5,2)  (6,2)    (6,3)    (7,3)    (7,4)    (8,4)      (8,5)
         (6,1)  (7,1)    (7,2)    (8,2)    (8,3)    (9,3)      (9,4)
                (4,3,1)  (8,1)    (9,1)    (9,2)    (10,2)     (10,3)
                         (4,3,2)  (5,3,2)  (10,1)   (11,1)     (11,2)
                         (5,3,1)  (5,4,1)  (5,4,2)  (5,4,3)    (12,1)
                                  (6,3,1)  (6,3,2)  (6,4,2)    (6,4,3)
                                           (6,4,1)  (6,5,1)    (6,5,2)
                                           (7,3,1)  (7,3,2)    (7,4,2)
                                                    (7,4,1)    (7,5,1)
                                                    (8,3,1)    (8,3,2)
                                                    (5,4,2,1)  (8,4,1)
                                                               (9,3,1)
                                                               (6,4,2,1)

Crossrefs

The following sequences count and rank integer partitions and finite sets according to whether their length is a subset-sum, linear combination, or semi-sum of the parts. The current sequence is starred.
sum-full sum-free comb-full comb-free semi-full semi-free
-----------------------------------------------------------
partitions: A367212 A367213 A367218 A367219 A367394 A367398
strict: A367214 A367215 A367220 A367221 A367395 A367399*
subsets: A367216 A367217 A367222 A367223 A367396 A367400
ranks: A367224 A367225 A367226 A367227 A367397 A367401
A000041 counts partitions, strict A000009.
A002865 counts partitions whose length is a part, complement A229816.
A365924 counts incomplete partitions, strict A365831.
A236912 counts partitions with no semi-sum of the parts, ranks A364461.
A237667 counts sum-free partitions, sum-full A237668.
A366738 counts semi-sums of partitions, strict A366741.
A367403 counts partitions without covering semi-sums, strict A367411.
Triangles:
A008284 counts partitions by length, strict A008289.
A365541 counts subsets with a semi-sum k.
A367404 counts partitions with a semi-sum k, strict A367405.
Cf. A000700, A126796, A188431, A238628, A237113, A363225, A364272, A365658, A365918, A365925, A367410.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&FreeQ[Total/@Subsets[#,{2}], Length[#]]&]], {n,0,15}]

A371788 Triangle read by rows where T(n,k) is the number of set partitions of {1..n} with exactly k distinct block-sums.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 2, 2, 1, 0, 2, 8, 4, 1, 0, 2, 19, 24, 6, 1, 0, 2, 47, 95, 49, 9, 1, 0, 6, 105, 363, 297, 93, 12, 1, 0, 12, 248, 1292, 1660, 753, 158, 16, 1, 0, 11, 563, 4649, 8409, 5591, 1653, 250, 20, 1, 0, 2, 1414, 15976, 41264, 38074, 15590, 3249, 380, 25, 1
Offset: 0

Views

Author

Gus Wiseman, Apr 16 2024

Keywords

Examples

			The set partition {{1,3},{2},{4}} has two distinct block-sums {2,4} so is counted under T(4,2).
Triangle begins:
     1
     0     1
     0     1     1
     0     2     2     1
     0     2     8     4     1
     0     2    19    24     6     1
     0     2    47    95    49     9     1
     0     6   105   363   297    93    12     1
     0    12   248  1292  1660   753   158    16     1
     0    11   563  4649  8409  5591  1653   250    20     1
     0     2  1414 15976 41264 38074 15590  3249   380    25     1
Row n = 4 counts the following set partitions:
  .  {{1,4},{2,3}}  {{1},{2,3,4}}    {{1},{2},{3,4}}  {{1},{2},{3},{4}}
     {{1,2,3,4}}    {{1,2},{3},{4}}  {{1},{2,3},{4}}
                    {{1,2},{3,4}}    {{1},{2,4},{3}}
                    {{1,3},{2},{4}}  {{1,4},{2},{3}}
                    {{1,3},{2,4}}
                    {{1,2,3},{4}}
                    {{1,2,4},{3}}
                    {{1,3,4},{2}}

Crossrefs

Row sums are A000110.
Column k = 1 is A035470.
A version for integer partitions is A116608.
For block lengths instead of sums we have A208437.
A008277 counts set partitions by length.
A275780 counts set partitions with distinct block-sums.
A371737 counts quanimous strict partitions, non-strict A321452.
A371789 counts non-quanimous sets, differences A371790.
Cf. A007837, A038041, A327899, A336137, A336138, A365663, A365661, A365925.

Programs

  • Mathematica
    sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]& /@ sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
Table[Length[Select[sps[Range[n]], Length[Union[Total/@#]]==k&]],{n,0,5},{k,0,n}]

A371839 Number of integer partitions of n with biquanimous multiplicities.

Original entry on oeis.org

1, 0, 0, 1, 1, 2, 3, 4, 6, 9, 11, 16, 22, 29, 38, 52, 66, 88, 114, 147, 186, 245, 302, 389, 486, 613, 757, 960, 1172, 1466, 1790, 2220, 2695, 3332, 4013, 4926, 5938, 7228, 8660, 10519, 12545, 15151, 18041, 21663, 25701, 30774, 36361, 43359, 51149, 60720, 71374
Offset: 0

Views

Author

Gus Wiseman, Apr 18 2024

Keywords

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.

Examples

			The partition y = (6,2,1,1) has multiplicities (1,1,2), which are biquanimous because we have the partition ((1,1),(2)), so y is counted under a(10).
The a(0) = 1 through a(10) = 11 partitions:
  ()  .  .  (21)  (31)  (32)  (42)    (43)    (53)    (54)      (64)
                        (41)  (51)    (52)    (62)    (63)      (73)
                              (2211)  (61)    (71)    (72)      (82)
                                      (3211)  (3221)  (81)      (91)
                                              (3311)  (3321)    (3322)
                                              (4211)  (4221)    (4321)
                                                      (4311)    (4411)
                                                      (5211)    (5221)
                                                      (222111)  (5311)
                                                                (6211)
                                                                (322111)

Crossrefs

For parts instead of multiplicities we have A002219 aerated, ranks A357976.
These partitions have Heinz numbers A371781.
The complement for parts instead of multiplicities is counted by A371795, ranks A371731, bisections A006827, A058695.
The complement is counted by A371840, ranks A371782.
A237258 = biquanimous strict partitions, ranks A357854, complement A371794.
A321451 counts non-quanimous partitions, ranks A321453.
A321452 counts quanimous partitions, ranks A321454.
A371783 counts k-quanimous partitions.
A371791 counts biquanimous sets, differences A232466.
A371792 counts non-biquanimous sets, differences A371793.
Cf. A035470, A064914, A305551, A321142, A365543, A365925, A367094.

Programs

  • Mathematica
    biqQ[y_]:=MemberQ[Total/@Subsets[y],Total[y]/2];
Table[Length[Select[IntegerPartitions[n], biqQ[Length/@Split[#]]&]],{n,0,30}]
Previous Showing 11-20 of 24 results. Next

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.