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-25 of 25 results.

A364464 Number of strict integer partitions of n where no part is the difference of two consecutive parts.

Original entry on oeis.org

1, 1, 1, 1, 2, 3, 2, 4, 4, 6, 5, 8, 9, 12, 13, 16, 16, 21, 23, 29, 34, 38, 41, 49, 57, 64, 73, 86, 95, 110, 120, 135, 160, 171, 197, 219, 247, 277, 312, 342, 386, 431, 476, 527, 598, 640, 727, 796, 893, 966, 1097, 1178, 1327, 1435, 1602, 1740, 1945, 2084, 2337
Offset: 0

Views

Author

Gus Wiseman, Jul 30 2023

Keywords

Comments

In other words, the parts are disjoint from the first differences.

Examples

			The strict partition y = (9,5,3,1) has differences (4,2,2), and these are disjoint from the parts, so y is counted under a(18).
The a(1) = 1 through a(9) = 6 strict partitions:
  (1)  (2)  (3)  (4)    (5)    (6)    (7)    (8)    (9)
                 (3,1)  (3,2)  (5,1)  (4,3)  (5,3)  (5,4)
                        (4,1)         (5,2)  (6,2)  (7,2)
                                      (6,1)  (7,1)  (8,1)
                                                    (4,3,2)
                                                    (5,3,1)

Crossrefs

For length instead of differences we have A240861, non-strict A229816.
For all differences of pairs of elements we have A364346, for subsets A007865.
For subsets instead of strict partitions we have A364463, complement A364466.
The non-strict version is A363260.
The complement is counted by A364536, non-strict A364467.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length, strict A008289.
A120641 counts strict double-free partitions, non-strict A323092.
A320347 counts strict partitions w/ distinct differences, non-strict A325325.
Cf. A002865, A025065, A236912, A237667, A275972, A363226, A364345, A364465.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&Intersection[#,-Differences[#]]=={}&]],{n,0,15}]
  • Python
    from collections import Counter
from sympy.utilities.iterables import partitions
def A364464(n): return sum(1 for s,p in map(lambda x: (x[0],tuple(sorted(Counter(x[1]).elements()))), filter(lambda p:max(p[1].values(),default=1)==1,partitions(n,size=True))) if set(p).isdisjoint({p[i+1]-p[i] for i in range(s-1)})) # Chai Wah Wu, Sep 26 2023

A364670 Number of strict integer partitions of n with a part equal to the sum of two distinct others. A variation of sum-full strict partitions.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 3, 1, 4, 3, 7, 6, 10, 10, 14, 16, 24, 25, 34, 39, 48, 59, 71, 81, 103, 120, 136, 166, 194, 226, 260, 312, 353, 419, 473, 557, 636, 742, 824, 974, 1097, 1266, 1418, 1646, 1837, 2124, 2356, 2717, 3029, 3469, 3830, 4383, 4884, 5547
Offset: 0

Views

Author

Gus Wiseman, Aug 03 2023

Keywords

Examples

			The a(6) = 1 through a(16) = 10 strict partitions (A = 10):
  321  .  431  .  532   5321  642   5431  743   6432   853
                  541         651   6421  752   6531   862
                  4321        5421  7321  761   7431   871
                              6321        5432  7521   6532
                                          6431  9321   6541
                                          6521  54321  7432
                                          8321         7621
                                                       8431
                                                       A321
                                                       64321

Crossrefs

For subsets of {1..n} we have A088809, complement A085489.
The non-strict version is A237113, complement A236912.
The non-binary complement is A237667, ranks A364532.
Allowing re-used parts gives A363226, non-strict A363225.
The non-binary version is A364272, non-strict A237668.
The complement is A364533, non-binary A364349.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length, strict A008289.
A108917 counts knapsack partitions, strict A275972, ranks A299702.
A323092 counts double-free partitions, ranks A320340.
Cf. A007865, A025065, A093971, A111133, A151897, A240861, A325862, A364346, A364350, A364534.

Programs

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

A364536 Number of strict integer partitions of n where some part is a difference of two consecutive parts.

Original entry on oeis.org

0, 0, 0, 1, 0, 0, 2, 1, 2, 2, 5, 4, 6, 6, 9, 11, 16, 17, 23, 25, 30, 38, 48, 55, 65, 78, 92, 106, 127, 146, 176, 205, 230, 277, 315, 366, 421, 483, 552, 640, 727, 829, 950, 1083, 1218, 1408, 1577, 1794, 2017, 2298, 2561, 2919, 3255, 3685, 4116, 4638, 5163
Offset: 0

Views

Author

Gus Wiseman, Jul 31 2023

Keywords

Comments

In other words, strict partitions with parts not disjoint from first differences.

Examples

			The a(3) = 1 through a(15) = 11 partitions (A = 10, B = 11, C = 12):
  21  .  .  42   421  431  63   532   542   84    742   743   A5
            321       521  621  541   632   642   841   752   843
                                631   821   651   A21   761   942
                                721   5321  921   5431  842   C21
                                4321        5421  6421  B21   6432
                                            6321  7321  6431  6531
                                                        6521  7431
                                                        7421  7521
                                                        8321  8421
                                                              9321
                                                              54321

Crossrefs

For all differences of pairs we have A363226, non-strict A363225.
For all non-differences of pairs we have A364346, strict A364345.
The strict complement is counted by A364464, non-strict A363260.
For subsets of {1..n} we have A364466, complement A364463.
The non-strict case is A364467, ranks A364537.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length, strict A008289.
A323092 counts double-free partitions, strict A120641.
A325325 counts partitions with distinct first-differences, strict A320347.
Cf. A002865, A025065, A093971, A108917, A229816, A236912, A237113, A237667, A326083, A364347.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&Intersection[#,-Differences[#]]!={}&]],{n,0,30}]
  • Python
    from collections import Counter
from sympy.utilities.iterables import partitions
def A364536(n): return sum(1 for s,p in map(lambda x: (x[0],tuple(sorted(Counter(x[1]).elements()))), filter(lambda p:max(p[1].values(),default=1)==1,partitions(n,size=True))) if not set(p).isdisjoint({p[i+1]-p[i] for i in range(s-1)})) # Chai Wah Wu, Sep 26 2023

A365069 Number of subsets of {1..n} containing n and some element equal to the sum of two or more distinct other elements. A variation of non-binary sum-full subsets without re-usable elements.

Original entry on oeis.org

0, 0, 0, 1, 2, 7, 17, 41, 88, 201, 418, 892, 1838, 3798, 7716, 15740
Offset: 0

Views

Author

Gus Wiseman, Aug 26 2023

Keywords

Comments

The complement is counted by A365071. The binary case is A364756. Allowing elements to be re-used gives A365070. A version for partitions (but not requiring n) is A237668.

Examples

			The subset {2,4,6} has 6 = 4 + 2 so is counted under a(6).
The subset {1,2,4,7} has 7 = 4 + 2 + 1 so is counted under a(7).
The subset {1,4,5,8} has 5 = 4 + 1 so is counted under a(8).
The a(0) = 0 through a(6) = 17 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,3,5}    {1,2,3,6}
                               {1,2,4,5}    {1,2,4,6}
                               {1,3,4,5}    {1,2,5,6}
                               {2,3,4,5}    {1,3,4,6}
                               {1,2,3,4,5}  {1,3,5,6}
                                            {1,4,5,6}
                                            {2,3,4,6}
                                            {2,3,5,6}
                                            {2,4,5,6}
                                            {1,2,3,4,6}
                                            {1,2,3,5,6}
                                            {1,2,4,5,6}
                                            {1,3,4,5,6}
                                            {2,3,4,5,6}
                                            {1,2,3,4,5,6}

Links

Crossrefs

The complement w/ re-usable parts is A288728, first differences of A007865.
First differences of A364534.
The binary complement is A364755, first differences of A085489.
The binary version is A364756, first differences of A088809.
The version with re-usable parts is A365070, first differences of A093971.
The complement is counted by A365071, first differences of A151897.
A124506 counts nonnegative combination-free subsets, differences of A326083.
A365046 counts nonnegative combination-full subsets, differences of A364914.
For partitions: A108917, A236912, A237113, A237668, A364532, A364913.
Strict partitions: A116861, A364272, A364349, A364350, A364839, A364916.
Cf. A050291, A326080, A363226, A364346, A364348, A364670.

Programs

  • Mathematica
    Table[Length[Select[Subsets[Range[n]], MemberQ[#,n]&&Intersection[#, Total/@Subsets[#, {2,Length[#]}]]!={}&]],{n,0,10}]

Formula

a(n) = 2^(n-1) - A365070(n).
First differences of A364534.

A364465 Number of subsets of {1..n} with all different first differences of elements.

Original entry on oeis.org

1, 2, 4, 7, 13, 22, 36, 61, 99, 156, 240, 381, 587, 894, 1334, 1967, 2951, 4370, 6406, 9293, 13357, 18976, 27346, 39013, 55437, 78154, 109632, 152415, 210801, 293502, 406664, 561693, 772463, 1058108, 1441796, 1956293, 2639215, 3579542, 4835842, 6523207
Offset: 0

Views

Author

Gus Wiseman, Jul 30 2023

Keywords

Examples

			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,2,4}
                         {1,3,4}

Links

Crossrefs

For all differences of pairs of elements we have A196723
For partitions instead of subsets we have A325325, strict A320347.
For subset-sums we have A325864, for partitions A108917, A275972.
A007318 counts subsets by length.
A053632 counts subsets by sum.
A363260 counts partitions disjoint from differences, complement A364467.
A364463 counts subsets disjoint from differences, complement A364466.
Cf. A000009, A008289, A011782, A236912, A320348, A325857, A325877, A325878, A326083, A364345, A364346.

Programs

  • Mathematica
    Table[Length[Select[Subsets[Range[n]],UnsameQ@@Differences[#]&]],{n,0,10}]

Extensions

More terms from Rémy Sigrist, Aug 06 2023
Previous Showing 21-25 of 25 results.

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

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