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 21-26 of 26 results.

A367398 Number of integer partitions of n whose length is not a semi-sum of the parts.

Original entry on oeis.org

1, 1, 1, 3, 4, 6, 8, 12, 16, 23, 28, 41, 52, 71, 89, 122, 151, 200, 246, 321, 398, 510, 620, 794, 968, 1212, 1474, 1837, 2219, 2748, 3302, 4055, 4882, 5942, 7094, 8623, 10275, 12376, 14721, 17661, 20920, 25011, 29516, 35120, 41419, 49053, 57609, 68092, 79780
Offset: 0

Views

Author

Gus Wiseman, Nov 19 2023

Keywords

Comments

We define a semi-sum of a multiset to be any sum of a 2-element submultiset. This is different from sums of pairs of elements. For example, 2 is the sum of a pair of elements of {1}, but there are no semi-sums.

Examples

			For the partition y = (4,3,1) we have semi-sums {4,5,7}, which do not include 3 (the length of y), so y is counted under a(8).
The a(1) = 1 through a(8) = 16 partitions:
  (1)  (2)  (3)    (4)     (5)      (6)       (7)        (8)
            (21)   (22)    (32)     (33)      (43)       (44)
            (111)  (31)    (41)     (42)      (52)       (53)
                   (1111)  (311)    (51)      (61)       (62)
                           (2111)   (222)     (322)      (71)
                           (11111)  (411)     (331)      (332)
                                    (21111)   (511)      (422)
                                    (111111)  (4111)     (431)
                                              (22111)    (611)
                                              (31111)    (4211)
                                              (211111)   (5111)
                                              (1111111)  (22211)
                                                         (221111)
                                                         (311111)
                                                         (2111111)
                                                         (11111111)
		

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
-----------------------------------------------------------
A000041 counts partitions, strict A000009.
A002865 counts partitions whose length is a part, complement A229816.
A236912 counts partitions containing no semi-sum, ranks A364461.
A237113 counts partitions containing a semi-sum, ranks A364462.
A237667 counts sum-free partitions, sum-full A237668.
A366738 counts semi-sums of partitions, strict A366741.
A367402 counts partitions with covering semi-sums, complement A367403.
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.

Programs

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

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
-----------------------------------------------------------
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.

Programs

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

A367400 Number of subsets of {1..n} whose cardinality is not the sum of two distinct elements.

Original entry on oeis.org

1, 2, 4, 7, 13, 25, 47, 88, 166, 313, 589, 1109, 2089, 3934, 7408, 13951, 26273, 49477, 93175, 175468, 330442, 622289, 1171897, 2206921, 4156081, 7826746, 14739356, 27757207, 52272469, 98439697, 185381983, 349112000, 657448942, 1238110153
Offset: 0

Views

Author

Gus Wiseman, Nov 21 2023

Keywords

Examples

			The set s = {1,2,3,6,7,8} has the following sums of pairs of distinct elements: {3,4,5,7,8,9,10,11,13,14,15}. This does not include 6, so s is counted under a(8).
The a(0) = 1 through a(4) = 13 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,3,4}
                         {2,3,4}
		

Crossrefs

The version containing n appears to be A112575.
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
-----------------------------------------------------------
A002865 counts partitions whose length is a part, complement A229816.
A364534 counts sum-full subsets.
A088809 and A093971 count subsets containing semi-sums.
A236912 counts partitions with no semi-sum of the parts, ranks A364461.
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.

Programs

  • Mathematica
    Table[Length[Select[Subsets[Range[n]], FreeQ[Total/@Subsets[#, {2}], Length[#]]&]], {n,0,10}]
  • Python
    from itertools import combinations
    def A367400(n): return (n*(n+1)>>1)+1+sum(1 for k in range(3,n+1) for w in (set(d) for d in combinations(range(1,n+1),k)) if not any({a,k-a}<=w for a in range(1,k+1>>1))) # Chai Wah Wu, Nov 21 2023

Formula

Conjectures from Chai Wah Wu, Nov 21 2023: (Start)
a(n) = 2*a(n-1) - a(n-2) + 2*a(n-3) - a(n-4) for n > 3.
G.f.: (-x^3 + x^2 + 1)/(x^4 - 2*x^3 + x^2 - 2*x + 1). (End)

Extensions

a(18)-a(33) from Chai Wah Wu, Nov 21 2023

A367401 Numbers m such that bigomega(m) is not the sum of prime indices of any semiprime divisor of m.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 31, 32, 33, 34, 35, 37, 38, 39, 41, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 55, 56, 57, 58, 59, 61, 62, 63, 64, 65, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77
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 A367398.

Examples

			60 has semiprime divisor 10 with prime indices {1,3} summing to 4 = bigomega(60), so 60 is not in the sequence.
The terms together with their prime indices begin:
   1: {}
   2: {1}
   3: {2}
   5: {3}
   6: {1,2}
   7: {4}
   8: {1,1,1}
   9: {2,2}
  10: {1,3}
  11: {5}
  13: {6}
  14: {1,4}
  15: {2,3}
  16: {1,1,1,1}
  17: {7}
  19: {8}
  20: {1,1,3}
		

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
-----------------------------------------------------------
A002865 counts partitions w/ length, complement A229816, ranks A325761.
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.
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.

Programs

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

A366131 Number of subsets of {1..n} with two elements (possibly the same) summing to n.

Original entry on oeis.org

0, 0, 2, 2, 10, 14, 46, 74, 202, 350, 862, 1562, 3610, 6734, 14926, 28394, 61162, 117950, 249022, 484922, 1009210, 1979054, 4076206, 8034314, 16422922, 32491550, 66045982, 131029082, 265246810, 527304974, 1064175886, 2118785834, 4266269482, 8503841150, 17093775742, 34101458042, 68461196410, 136664112494
Offset: 0

Views

Author

Gus Wiseman, Oct 07 2023

Keywords

Examples

			The a(0) = 0 through a(5) = 14 subsets:
  .  .  {1}    {1,2}    {2}        {1,4}
        {1,2}  {1,2,3}  {1,2}      {2,3}
                        {1,3}      {1,2,3}
                        {2,3}      {1,2,4}
                        {2,4}      {1,3,4}
                        {1,2,3}    {1,4,5}
                        {1,2,4}    {2,3,4}
                        {1,3,4}    {2,3,5}
                        {2,3,4}    {1,2,3,4}
                        {1,2,3,4}  {1,2,3,5}
                                   {1,2,4,5}
                                   {1,3,4,5}
                                   {2,3,4,5}
                                   {1,2,3,4,5}
		

Crossrefs

The complement is counted by A117855.
For pairs summing to n + 1 we have A167936.
A068911 counts subsets of {1..n} w/o two distinct elements summing to n.
A093971/A088809/A364534 count certain types of sum-full subsets.

Programs

  • Mathematica
    Table[Length[Select[Subsets[Range[n]],MemberQ[Total/@Tuples[#,2],n]&]],{n,0,10}]
  • Python
    def A366131(n): return (1<>1)<<1) if n else 0 # Chai Wah Wu, Nov 14 2023

Formula

From Chai Wah Wu, Nov 14 2023: (Start)
a(n) = 2*a(n-1) + 3*a(n-2) - 6*a(n-3) for n > 3.
G.f.: 2*x^2*(1 - x)/((2*x - 1)*(3*x^2 - 1)). (End)

A366130 Number of subsets of {1..n} with a subset summing to n + 1.

Original entry on oeis.org

0, 0, 1, 2, 7, 15, 38, 79, 184, 378, 823, 1682, 3552, 7208, 14948, 30154, 61698, 124302, 252125, 506521, 1022768, 2051555, 4127633, 8272147, 16607469, 33258510, 66680774, 133467385, 267349211, 535007304, 1071020315, 2142778192, 4288207796
Offset: 0

Views

Author

Gus Wiseman, Oct 07 2023

Keywords

Examples

			The subset S = {1,2,4} has subset {1,4} with sum 4+1 and {2,4} with sum 5+1 and {1,2,4} with sum 6+1, so S is counted under a(4), a(5), and a(6).
The a(0) = 0 through a(5) = 15 subsets:
  .  .  {1,2}  {1,3}    {1,4}      {1,5}
               {1,2,3}  {2,3}      {2,4}
                        {1,2,3}    {1,2,3}
                        {1,2,4}    {1,2,4}
                        {1,3,4}    {1,2,5}
                        {2,3,4}    {1,3,5}
                        {1,2,3,4}  {1,4,5}
                                   {2,3,4}
                                   {2,4,5}
                                   {1,2,3,4}
                                   {1,2,3,5}
                                   {1,2,4,5}
                                   {1,3,4,5}
                                   {2,3,4,5}
                                   {1,2,3,4,5}
		

Crossrefs

For pairs summing to n + 1 we have A167762, complement A038754.
For n instead of n + 1 we have A365376, for pairs summing to n A365544.
The complement is counted by A365377 shifted.
The complement for pairs summing to n is counted by A365377.
A068911 counts subsets of {1..n} w/o two distinct elements summing to n.
A093971/A088809/A364534 count certain types of sum-full subsets.

Programs

  • Mathematica
    Table[Length[Select[Subsets[Range[n]],MemberQ[Total/@Subsets[#],n+1]&]],{n,0,10}]
  • Python
    from itertools import combinations
    from sympy.utilities.iterables import partitions
    def A366130(n):
        a = tuple(set(p.keys()) for p in partitions(n+1,k=n) if max(p.values(),default=0)==1)
        return sum(1 for k in range(2,n+1) for w in (set(d) for d in combinations(range(1,n+1),k)) if any(s<=w for s in a)) # Chai Wah Wu, Nov 24 2023

Formula

Diagonal k = n + 1 of A365381.

Extensions

a(20)-a(32) from Chai Wah Wu, Nov 24 2023
Previous Showing 21-26 of 26 results.