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 51-60 of 63 results. Next

A387113 Numbers whose prime indices do not have (strictly) choosable initial intervals.

Original entry on oeis.org

4, 8, 12, 16, 18, 20, 24, 27, 28, 32, 36, 40, 44, 48, 52, 54, 56, 60, 64, 68, 72, 76, 80, 81, 84, 88, 90, 92, 96, 100, 104, 108, 112, 116, 120, 124, 126, 128, 132, 135, 136, 140, 144, 148, 150, 152, 156, 160, 162, 164, 168, 172, 176, 180, 184, 188, 189, 192
Offset: 1

Views

Author

Gus Wiseman, Aug 24 2025

Keywords

Comments

The initial interval of a nonnegative integer x is the set {1,...,x}.
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.
We say that a set or sequence of nonempty sets is choosable iff it is possible to choose a different element from each set. For example, ({1,2},{1},{1,3}) is choosable because we have the choice (2,1,3), but ({1,2,3},{1},{1,3},{2}) is not.
This sequence lists all numbers k such that if the prime indices of k are (x1,x2,...,xz), then the sequence of sets (initial intervals) ({1,...,x1},{1,...,x2},...,{1,...,xz}) is not choosable.

Examples

			The prime indices of 18 are {1,2,2}, with initial intervals ({1},{1,2},{1,2}), which have choices (1,1,1), (1,1,2), (1,2,1), (1,2,2), and since none of these are strict, 18 is in the sequence.
The prime indices of 85 are {3,7}, with initial intervals {{1,2,3},{1,2,3,4,5,6,7}}, which are choosable, so 85 is in not the sequence.
The prime indices of 90 are {1,2,2,3}, with initial intervals {{1},{1,2},{1,2},{1,2,3}}, which are not choosable, so 90 is in the sequence.
The terms together with their prime indices begin:
    4: {1,1}
    8: {1,1,1}
   12: {1,1,2}
   16: {1,1,1,1}
   18: {1,2,2}
   20: {1,1,3}
   24: {1,1,1,2}
   27: {2,2,2}
   28: {1,1,4}
   32: {1,1,1,1,1}
   36: {1,1,2,2}
   40: {1,1,1,3}
   44: {1,1,5}
   48: {1,1,1,1,2}
   52: {1,1,6}
   54: {1,2,2,2}
   56: {1,1,1,4}
   60: {1,1,2,3}
   64: {1,1,1,1,1,1}
		

Crossrefs

For partitions instead of initial intervals we have A276079, complement A276078.
For prime factors instead of initial intervals we have A355529, complement A368100.
For divisors instead of initial intervals we have A355740, complement A368110.
These are the positions of 0 in A387111, complement A387134.
The complement is A387112.
Partitions of this type are counted by A387118, complement A238873.
For strict partitions instead of initial intervals we have A387137, complement A387176.
A061395 gives greatest prime index, least A055396.
A112798 lists prime indices, row sums A056239 or A066328, lengths A001222.
A120383 lists numbers divisible by all of their prime indices.
A367902 counts choosable set-systems, complement A367903.
A370582 counts sets with choosable prime factors, complement A370583.
A370585 counts maximal subsets with choosable prime factors.

Programs

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

A326370 Number of condensations to convert all the partitions of n to strict partitions of n.

Original entry on oeis.org

0, 1, 1, 2, 1, 2, 2, 3, 2, 2, 3, 3, 3, 3, 3, 4, 3, 3, 4, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 4, 4, 5, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 5, 5, 6, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6
Offset: 1

Views

Author

Clark Kimberling, Jul 06 2019

Keywords

Comments

Suppose that p is a partition of n. Let x(1), x(2), ..., x(k) be the distinct parts of p, and let m(i) be the multiplicity of x(i) in p. The partition {m(1)*x(1), m(2)*x(2), ..., x(k)*m(k)} of n is called the condensation of p.

Examples

			The condensation of [4, 2, 1, 1] is [4, 2, 2], of which the condensation is [4, 4], of which condensation is [8]; thus, a total of three condensations. This is maximal for the partitions of 8, so that a(8) = 3. See A239312.
		

Crossrefs

Programs

  • Mathematica
    f[m_] := Table[Tally[m][[h]][[1]]*Tally[m][[h]][[2]], {h, 1, Length[Tally[m]]}];
    m[n_, k_] := IntegerPartitions[n][[k]];
    q[n_, k_] := -2 + Length[FixedPointList[f, m[n, k]]];
    a[n_] := Max[Table[q[n, k], {k, 1, PartitionsP[n]}]];
    Table[a[n], {n, 1, 30}]
  • PARI
    See Links section.

Extensions

More terms from Rémy Sigrist, Jul 07 2019

A326371 Irregular triangular array: row n shows the number of condensations needed to convert all the partitions of n to strict partitions.

Original entry on oeis.org

1, 1, 2, 1, 1, 2, 1, 1, 2, 3, 2, 1, 1, 1, 2, 2, 2, 2, 1, 1, 1, 2, 2, 1, 3, 2, 2, 2, 2, 1, 1, 1, 2, 1, 1, 2, 2, 2, 3, 2, 2, 2, 2, 2, 1, 1, 1, 2, 1, 1, 2, 2, 1, 3, 4, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 3, 2, 2, 1, 2, 3, 2, 2, 2, 2
Offset: 1

Views

Author

Clark Kimberling, Jul 06 2019

Keywords

Comments

It appears that there is a limiting row and that it includes every positive integer.

Examples

			First seven rows:
1
1   2
1   1   2
1   1   2   3   2
1   1   1   2   2   2   2
1   1   1   2   2   1   3   2   2   2   2
1   1   1   2   1   1   2   2   2   3   2   2   2   2   2
		

Crossrefs

Programs

  • Mathematica
    f[m_] := Table[Tally[m][[h]][[1]]*Tally[m][[h]][[2]], {h, 1, Length[Tally[m]]}];l
    m[n_, k_] := IntegerPartitions[n][[k]];
    q[n_, k_] := -1 + Length[FixedPointList[f, m[n, k]]];
    t = Table[q[n, k], {n, 1, 16}, {k, 1, PartitionsP[n]}]   (* A326371, array *)
    Flatten[t]   (* A326371, sequence *)
    TableForm[t]

A354910 Number of compositions of n that are the run-sums of some other composition.

Original entry on oeis.org

1, 1, 1, 3, 5, 9, 16, 31, 54, 101, 183, 336, 609, 1121, 2038, 3730, 6804, 12445, 22703, 41501, 75768
Offset: 0

Views

Author

Gus Wiseman, Jun 20 2022

Keywords

Comments

Every sequence can be uniquely split into a sequence of non-overlapping runs. For example, the runs of (2,2,1,1,1,3,2,2) are ((2,2),(1,1,1),(3),(2,2)), with sums (4,3,3,4).

Examples

			The a(0) = 0 through a(6) = 16 compositions:
  ()  (1)  (2)  (3)   (4)    (5)    (6)
                (12)  (13)   (14)   (15)
                (21)  (22)   (23)   (24)
                      (31)   (32)   (33)
                      (121)  (41)   (42)
                             (122)  (51)
                             (131)  (123)
                             (212)  (132)
                             (221)  (141)
                                    (213)
                                    (222)
                                    (231)
                                    (312)
                                    (321)
                                    (1212)
                                    (2121)
		

Crossrefs

The version for binary words is A000126, complement A000918
The complement is counted by A354909, ranked by A354904.
These compositions are ranked by A354912 = nonzeros of A354578.
A003242 counts anti-run compositions, ranked by A333489.
A238279 and A333755 count compositions by number of runs.
A353851 counts compositions with all equal run-sums, ranked by A353848.
A353853-A353859 pertain to composition run-sum trajectory.
A353932 lists run-sums of standard compositions, rows ranked by A353847.

Programs

  • Mathematica
    Table[Length[Union[Total/@Split[#]&/@ Join@@Permutations/@IntegerPartitions[n]]],{n,0,15}]

A371179 Positive integers with fewer distinct prime factors (A001221) than distinct divisors of prime indices (A370820).

Original entry on oeis.org

3, 5, 7, 9, 11, 13, 14, 15, 17, 19, 21, 23, 25, 26, 27, 28, 29, 31, 33, 35, 37, 38, 39, 41, 43, 45, 46, 47, 49, 51, 52, 53, 55, 56, 57, 58, 59, 61, 63, 65, 67, 69, 70, 71, 73, 74, 75, 76, 77, 78, 79, 81, 83, 85, 86, 87, 89, 91, 92, 93, 94, 95, 97, 98, 99, 101
Offset: 1

Views

Author

Gus Wiseman, Mar 19 2024

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.

Examples

			The terms together with their prime indices begin:
     3: {2}        28: {1,1,4}    52: {1,1,6}      74: {1,12}
     5: {3}        29: {10}       53: {16}         75: {2,3,3}
     7: {4}        31: {11}       55: {3,5}        76: {1,1,8}
     9: {2,2}      33: {2,5}      56: {1,1,1,4}    77: {4,5}
    11: {5}        35: {3,4}      57: {2,8}        78: {1,2,6}
    13: {6}        37: {12}       58: {1,10}       79: {22}
    14: {1,4}      38: {1,8}      59: {17}         81: {2,2,2,2}
    15: {2,3}      39: {2,6}      61: {18}         83: {23}
    17: {7}        41: {13}       63: {2,2,4}      85: {3,7}
    19: {8}        43: {14}       65: {3,6}        86: {1,14}
    21: {2,4}      45: {2,2,3}    67: {19}         87: {2,10}
    23: {9}        46: {1,9}      69: {2,9}        89: {24}
    25: {3,3}      47: {15}       70: {1,3,4}      91: {4,6}
    26: {1,6}      49: {4,4}      71: {20}         92: {1,1,9}
    27: {2,2,2}    51: {2,7}      73: {21}         93: {2,11}
		

Crossrefs

The LHS is A001221, distinct case of A001222.
The RHS is A370820, for prime factors A303975.
Partitions of this type are counted by A371132, strict A371180.
Counting all prime indices on the LHS gives A371168, counted by A371173.
The complement is A371177, counted by A371178, strict A371128.
A000005 counts divisors.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length.
A305148 counts pairwise indivisible (stable) partitions, ranks A316476.

Programs

  • Mathematica
    Select[Range[100],PrimeNu[#]
    				

Formula

A001221(a(n)) < A370820(a(n)).

A371180 Number of strict integer partitions of n with fewer parts than distinct divisors of parts.

Original entry on oeis.org

0, 0, 1, 1, 1, 3, 2, 4, 4, 7, 8, 10, 12, 15, 19, 22, 29, 33, 40, 47, 57, 68, 81, 95, 110, 129, 152, 178, 207, 240, 277, 317, 365, 422, 486, 558, 632, 723, 824, 940, 1067, 1210, 1371, 1544, 1751, 1977, 2233, 2508, 2820, 3162, 3555, 3983, 4465, 4990, 5571, 6224
Offset: 0

Views

Author

Gus Wiseman, Mar 18 2024

Keywords

Examples

			The strict partition (6,4,2,1) has 4 parts and 5 distinct divisors of parts {1,2,3,4,5}, so is counted under a(13).
The a(2) = 1 through a(11) = 10 partitions:
  (2)  (3)  (4)  (5)    (6)    (7)    (8)      (9)      (10)     (11)
                 (3,2)  (4,2)  (4,3)  (5,3)    (5,4)    (6,4)    (6,5)
                 (4,1)         (5,2)  (6,2)    (6,3)    (7,3)    (7,4)
                               (6,1)  (4,3,1)  (7,2)    (8,2)    (8,3)
                                               (8,1)    (9,1)    (9,2)
                                               (4,3,2)  (5,3,2)  (10,1)
                                               (6,2,1)  (5,4,1)  (5,4,2)
                                                        (6,3,1)  (6,3,2)
                                                                 (6,4,1)
                                                                 (8,2,1)
		

Crossrefs

The LHS is represented by A001221, distinct case of A001222.
The RHS is represented by A370820, for prime factors A303975.
The version for equality is A371128.
The non-strict version is A371132, ranks A371179.
The non-strict complement is A371178, ranks A371177.
A000005 counts divisors.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&Length[Union[#]] < Length[Union@@Divisors/@#]&]],{n,0,30}]

A387177 Numbers whose prime indices have choosable sets of strict integer partitions. Positions of nonzero terms in A387115.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 19, 21, 22, 23, 25, 26, 29, 30, 31, 33, 34, 35, 37, 38, 39, 41, 42, 43, 46, 47, 49, 50, 51, 53, 55, 57, 58, 59, 61, 62, 65, 66, 67, 69, 70, 71, 73, 74, 75, 77, 78, 79, 82, 83, 85, 86, 87, 89, 91, 93, 94, 95, 97, 98
Offset: 1

Views

Author

Gus Wiseman, Aug 29 2025

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.
We say that a sequence of nonempty sets is choosable iff it is possible to choose a different element from each set. For example, ({1,2},{1},{1,3}) is choosable because we have the choice (2,1,3), but ({1},{2},{1,3},{2,3}) is not.

Examples

			The prime indices of 50 are {1,3,3}, and {(1),(3),(2,1)} is a valid choice of distinct strict partitions, so 50 is in the sequence.
		

Crossrefs

The version for all partitions appears to be A276078, counted by A052335.
The complement for all partitions appears to be A276079, counted by A387134.
The complement for divisors is A355740, counted by A370320.
Twice-partitions of this type (into distinct strict partitions) are counted by A358914.
The version for divisors is A368110, counted by A239312.
The version for initial intervals is A387112, counted by A238873, see A387111.
The complement for initial intervals is A387113, counted by A387118.
These are the positions of nonzero terms in A387115.
The complement is A387176.
Partitions of this type are counted by A387178, complement A387137.
The complement for constant partitions is A387180, counted by A387329, see A387120.
The version for constant partitions is A387181, counted by A387330.
A000041 counts integer partitions, strict A000009.
A003963 multiplies together the prime indices of n.
A112798 lists prime indices, row sums A056239 or A066328, lengths A001222.
A289509 lists numbers with relatively prime prime indices.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    strptns[n_]:=Select[IntegerPartitions[n],UnsameQ@@#&];
    Select[Range[100],Select[Tuples[strptns/@prix[#]],UnsameQ@@#&]!={}&]

A387178 Number of integer partitions of n whose parts have choosable sets of strict integer partitions.

Original entry on oeis.org

1, 1, 1, 2, 2, 3, 5, 6, 8, 10, 13, 17, 21, 27, 34, 42, 53, 65, 80, 98, 119, 146, 177, 213, 258, 309, 370, 443, 528, 628, 745, 882, 1043, 1229, 1447, 1700, 1993, 2333, 2727, 3182, 3707, 4311, 5008, 5808, 6727, 7782, 8990, 10371, 11952, 13756, 15815, 18161
Offset: 0

Views

Author

Gus Wiseman, Sep 02 2025

Keywords

Comments

First differs from A052337 in having 745 instead of 746.
We say that a sequence of nonempty sets is choosable iff it is possible to choose a different element from each set. For example, ({1,2},{1},{1,3}) is choosable because we have the choice (2,1,3), but ({1},{2},{1,3},{2,3}) is not.
a(n) is the number of integer partitions of n such that it is possible to choose a sequence of distinct strict integer partitions of each part.
Also the number of integer partitions of n with no part k whose multiplicity exceeds A000009(k).

Examples

			The partition y = (3,3,2) has sets of strict integer partitions ({(2,1),(3)},{(2,1),(3)},{(2)}), and we have the choice ((2,1),(3),(2)) or ((3),(2,1),(2)), so y is counted under a(8).
The a(1) = 1 through a(9) = 10 partitions:
  (1)  (2)  (3)    (4)    (5)    (6)      (7)      (8)      (9)
            (2,1)  (3,1)  (3,2)  (3,3)    (4,3)    (4,4)    (5,4)
                          (4,1)  (4,2)    (5,2)    (5,3)    (6,3)
                                 (5,1)    (6,1)    (6,2)    (7,2)
                                 (3,2,1)  (3,3,1)  (7,1)    (8,1)
                                          (4,2,1)  (3,3,2)  (4,3,2)
                                                   (4,3,1)  (4,4,1)
                                                   (5,2,1)  (5,3,1)
                                                            (6,2,1)
                                                            (3,3,2,1)
		

Crossrefs

For initial intervals instead of strict partitions we have A238873, ranks A387112.
For divisors instead of strict partitions we have A239312, ranks A368110.
The complement for divisors is A370320, ranks A355740.
For prime factors instead of strict partitions we have A370592, ranks A368100.
The complement for prime factors is A370593, ranks A355529.
The complement for initial intervals is A387118, ranks A387113.
The complement for all partitions is A387134, ranks A387577.
The complement is counted by A387137, ranks A387176.
These partitions are ranked by A387177.
For all partitions instead of just strict partitions we have A387328, ranks A387576.
The complement for constant partitions is A387329, ranks A387180.
For constant partitions instead of strict partitions we have A387330, ranks A387181.
A000041 counts integer partitions, strict A000009.
A358914 counts twice-partitions into distinct strict partitions.
A367902 counts choosable set-systems, complement A367903.

Programs

  • Mathematica
    strptns[n_]:=Select[IntegerPartitions[n],UnsameQ@@#&];
    Table[Length[Select[IntegerPartitions[n],Select[Tuples[strptns/@#],UnsameQ@@#&]!={}&]],{n,0,15}]

A387180 Numbers of which it is not possible to choose a different constant integer partition of each prime index.

Original entry on oeis.org

4, 8, 12, 16, 20, 24, 27, 28, 32, 36, 40, 44, 48, 52, 54, 56, 60, 64, 68, 72, 76, 80, 81, 84, 88, 92, 96, 100, 104, 108, 112, 116, 120, 124, 125, 128, 132, 135, 136, 140, 144, 148, 152, 156, 160, 162, 164, 168, 172, 176, 180, 184, 188, 189, 192, 196, 200, 204
Offset: 1

Views

Author

Gus Wiseman, Aug 30 2025

Keywords

Comments

First differs from A276079 in having 125.
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.
Also numbers n with at least one prime index k such that the multiplicity of prime(k) in the prime factorization of n exceeds the number of divisors of k.

Examples

			The prime indices of 60 are {1,1,2,3}, and we have the following 4 choices of constant partitions:
  ((1),(1),(2),(3))
  ((1),(1),(2),(1,1,1))
  ((1),(1),(1,1),(3))
  ((1),(1),(1,1),(1,1,1))
Since none of these is strict, 60 is in the sequence.
The prime indices of 90 are {1,2,2,3}, and we have the following 4 strict choices:
  ((1),(2),(1,1),(3))
  ((1),(2),(1,1),(1,1,1))
  ((1),(1,1),(2),(3))
  ((1),(1,1),(2),(1,1,1))
So 90 is not in the sequence.
		

Crossrefs

For prime factors instead of constant partitions we have A355529, counted by A370593.
For divisors instead of constant partitions we have A355740, counted by A370320.
The complement for prime factors is A368100, counted by A370592.
The complement for divisors is A368110, counted by A239312.
The complement for initial intervals is A387112, counted by A238873.
For initial intervals instead of partitions we have A387113, counted by A387118.
These are the positions of zero in A387120.
For strict instead of constant partitions we have A387176, counted by A387137.
The complement for strict partitions is A387177, counted by A387178.
Twice-partitions of this type are counted by A387179, constant-block case of A296122.
The complement is A387181 (nonzeros of A387120), counted by A387330.
Partitions of this type are counted by A387329.
A000041 counts integer partitions, strict A000009.
A003963 multiplies together prime indices.
A112798 lists prime indices, row sums A056239 or A066328, lengths A001222.
A120383 lists numbers divisible by all of their prime indices.
A289509 lists numbers with relatively prime prime indices.

Programs

  • Mathematica
    prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Select[Range[100],Select[Tuples[Select[IntegerPartitions[#],SameQ@@#&]&/@prix[#]],UnsameQ@@#&]=={}&]

A387329 Number of integer partitions of n such that it is not possible to choose a different constant integer partition of each part.

Original entry on oeis.org

0, 0, 1, 1, 2, 3, 6, 8, 12, 18, 26, 35, 50, 67, 92, 122, 164, 214, 282, 364, 472
Offset: 0

Views

Author

Gus Wiseman, Sep 05 2025

Keywords

Examples

			The a(2) = 1 through a(8) = 12 partitions:
  (11)  (111)  (211)   (311)    (222)     (511)      (611)
               (1111)  (2111)   (411)     (2221)     (2222)
                       (11111)  (2211)    (3211)     (3311)
                                (3111)    (4111)     (4211)
                                (21111)   (22111)    (5111)
                                (111111)  (31111)    (22211)
                                          (211111)   (32111)
                                          (1111111)  (41111)
                                                     (221111)
                                                     (311111)
                                                     (2111111)
                                                     (11111111)
		

Crossrefs

For divisors instead of constant partitions we have A370320, complement A239312.
For all (not just constant) partitions we have A387134, ranks A387577.
The complement all partitions is A387328, ranks A387576.
The complement strict partitions is A387178.
For strict (not just constant) partitions we have A387137.
These partitions are ranked by A387180.
The complement is A387330, ranked by A387181.
A000005 counts constant integer partitions.
A000009 counts strict integer partitions.
A000041 counts integer partitions.

Programs

  • Mathematica
    consptns[n_]:=Select[IntegerPartitions[n],SameQ@@#&];
    Table[Length[Select[IntegerPartitions[n],Select[Tuples[consptns/@#],UnsameQ@@#&]=={}&]],{n,0,15}]
Previous Showing 51-60 of 63 results. Next