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.

Showing 1-9 of 9 results.

A316496 Number of totally strong integer partitions of n.

Original entry on oeis.org

1, 1, 2, 3, 4, 5, 8, 8, 12, 13, 18, 20, 27, 27, 38, 41, 52, 56, 73, 77, 99, 105, 129, 145, 176, 186, 229, 253, 300, 329, 395, 427, 504, 555, 648, 716, 836, 905, 1065, 1173, 1340, 1475, 1703, 1860, 2140, 2349, 2671, 2944, 3365, 3666, 4167, 4582, 5160, 5668
Offset: 0

Views

Author

Gus Wiseman, Jul 29 2018

Keywords

Comments

An integer partition is totally strong if either it is empty, equal to (1), or its run-lengths are weakly decreasing (strong) and are themselves a totally strong partition.

Examples

			The a(1) = 1 through a(8) = 12 totally strong partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (21)   (22)    (32)     (33)      (43)       (44)
             (111)  (31)    (41)     (42)      (52)       (53)
                    (1111)  (221)    (51)      (61)       (62)
                            (11111)  (222)     (331)      (71)
                                     (321)     (421)      (332)
                                     (2211)    (2221)     (431)
                                     (111111)  (1111111)  (521)
                                                          (2222)
                                                          (3311)
                                                          (22211)
                                                          (11111111)
For example, the partition (3,3,2,1) has run-lengths (2,1,1), which are weakly decreasing, but they have run-lengths (1,2), which are not weakly decreasing, so (3,3,2,1) is not totally strong.
		

Crossrefs

The Heinz numbers of these partitions are A316529.
The version for compositions is A332274.
The dual version is A332275.
The version for reversed partitions is (also) A332275.
The narrowly normal version is A332297.
The alternating version is A332339 (see also A317256).
Partitions with weakly decreasing run-lengths are A100882.

Programs

  • Mathematica
    totincQ[q_]:=Or[q=={},q=={1},And[GreaterEqual@@Length/@Split[q],totincQ[Length/@Split[q]]]];
    Table[Length[Select[IntegerPartitions[n],totincQ]],{n,0,30}]

Extensions

Updated with corrected terminology by Gus Wiseman, Mar 07 2020

A317256 Number of alternately co-strong integer partitions of n.

Original entry on oeis.org

1, 1, 2, 3, 5, 6, 11, 13, 19, 25, 35, 42, 61, 74, 98, 122, 161, 194, 254, 304, 388, 472, 589, 700, 878, 1044, 1278, 1525, 1851, 2182, 2651, 3113, 3735, 4389, 5231, 6106, 7278, 8464, 9995, 11631, 13680, 15831, 18602, 21463, 25068, 28927, 33654, 38671, 44942, 51514
Offset: 0

Views

Author

Gus Wiseman, Jul 25 2018

Keywords

Comments

A sequence is alternately co-strong if either it is empty, equal to (1), or its run-lengths are weakly increasing (co-strong) and, when reversed, are themselves an alternately co-strong sequence.
Also the number of alternately strong reversed integer partitions of n.

Examples

			The a(1) = 1 through a(7) = 13 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)
       (11)  (21)   (22)    (32)     (33)      (43)
             (111)  (31)    (41)     (42)      (52)
                    (211)   (311)    (51)      (61)
                    (1111)  (2111)   (222)     (322)
                            (11111)  (321)     (421)
                                     (411)     (511)
                                     (2211)    (3211)
                                     (3111)    (4111)
                                     (21111)   (22111)
                                     (111111)  (31111)
                                               (211111)
                                               (1111111)
For example, starting with the partition y = (3,2,2,1,1) and repeatedly taking run-lengths and reversing gives (3,2,2,1,1) -> (2,2,1) -> (1,2), which is not weakly decreasing, so y is not  alternately co-strong. On the other hand, we have (3,3,2,2,1,1,1) -> (3,2,2) -> (2,1) -> (1,1) -> (2) -> (1), so (3,3,2,2,1,1,1) is counted under a(13).
		

Crossrefs

The Heinz numbers of these partitions are given by A317257.
The total (instead of alternating) version is A332275.
Dominates A332289 (the normal version).
The generalization to compositions is A332338.
The dual version is A332339.
The case of reversed partitions is (also) A332339.

Programs

  • Mathematica
    tniQ[q_]:=Or[q=={},q=={1},And[LessEqual@@Length/@Split[q],tniQ[Reverse[Length/@Split[q]]]]];
    Table[Length[Select[IntegerPartitions[n],tniQ]],{n,0,30}]

Extensions

Updated with corrected terminology by Gus Wiseman, Mar 08 2020

A317257 Heinz numbers of alternately co-strong integer partitions.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 51, 52, 53, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70
Offset: 1

Views

Author

Gus Wiseman, Jul 25 2018

Keywords

Comments

The first term absent from this sequence but present in A242031 is 180.
A sequence is alternately co-strong if either it is empty, equal to (1), or its run-lengths are weakly increasing (co-strong) and, when reversed, are themselves an alternately co-strong sequence.
The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k).

Examples

			The sequence of terms together with their prime indices begins:
    1: {}          16: {1,1,1,1}     32: {1,1,1,1,1}
    2: {1}         17: {7}           33: {2,5}
    3: {2}         19: {8}           34: {1,7}
    4: {1,1}       20: {1,1,3}       35: {3,4}
    5: {3}         21: {2,4}         36: {1,1,2,2}
    6: {1,2}       22: {1,5}         37: {12}
    7: {4}         23: {9}           38: {1,8}
    8: {1,1,1}     24: {1,1,1,2}     39: {2,6}
    9: {2,2}       25: {3,3}         40: {1,1,1,3}
   10: {1,3}       26: {1,6}         41: {13}
   11: {5}         27: {2,2,2}       42: {1,2,4}
   12: {1,1,2}     28: {1,1,4}       43: {14}
   13: {6}         29: {10}          44: {1,1,5}
   14: {1,4}       30: {1,2,3}       45: {2,2,3}
   15: {2,3}       31: {11}          46: {1,9}
		

Crossrefs

These partitions are counted by A317256.
The complement is A317258.
Totally co-strong partitions are counted by A332275.
Alternately co-strong compositions are counted by A332338.
Alternately co-strong reversed partitions are counted by A332339.
The total version is A335376.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    totincQ[q_]:=Or[Length[q]<=1,And[OrderedQ[Length/@Split[q]],totincQ[Reverse[Length/@Split[q]]]]];
    Select[Range[100],totincQ[Reverse[primeMS[#]]]&]

Extensions

Updated with corrected terminology by Gus Wiseman, Jun 04 2020

A332275 Number of totally co-strong integer partitions of n.

Original entry on oeis.org

1, 1, 2, 3, 5, 6, 11, 12, 17, 22, 30, 32, 49, 53, 70, 82, 108, 119, 156, 171, 219, 250, 305, 336, 424, 468, 562, 637, 754, 835, 1011, 1108, 1304, 1461, 1692, 1873, 2212, 2417, 2787, 3109, 3562, 3911, 4536, 4947, 5653, 6265, 7076, 7758, 8883, 9669, 10945, 12040
Offset: 0

Views

Author

Gus Wiseman, Feb 12 2020

Keywords

Comments

A sequence is totally co-strong if it is empty, equal to (1), or its run-lengths are weakly increasing (co-strong) and are themselves a totally co-strong sequence.
Also the number of totally strong reversed integer partitions of n.

Examples

			The a(1) = 1 through a(7) = 12 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)
       (11)  (21)   (22)    (32)     (33)      (43)
             (111)  (31)    (41)     (42)      (52)
                    (211)   (311)    (51)      (61)
                    (1111)  (2111)   (222)     (322)
                            (11111)  (321)     (421)
                                     (411)     (511)
                                     (2211)    (4111)
                                     (3111)    (22111)
                                     (21111)   (31111)
                                     (111111)  (211111)
                                               (1111111)
For example, the partition y = (5,4,4,4,3,3,3,2,2,2,2,2,2,1,1,1,1,1,1) has run-lengths (1,3,3,6,6), with run-lengths (1,2,2), with run-lengths (1,2), with run-lengths (1,1), with run-lengths (2), with run-lengths (1). All of these having weakly increasing run-lengths, and the last is (1), so y is counted under a(44).
		

Crossrefs

The strong version is A316496.
The version for reversed partitions is (also) A316496.
The alternating version is A317256.
The generalization to compositions is A332274.

Programs

  • Mathematica
    totincQ[q_]:=Or[q=={},q=={1},And[LessEqual@@Length/@Split[q],totincQ[Length/@Split[q]]]];
    Table[Length[Select[IntegerPartitions[n],totincQ]],{n,0,30}]

A332289 Number of widely alternately co-strongly normal integer partitions of n.

Original entry on oeis.org

1, 1, 1, 2, 2, 1, 2, 2, 1, 1, 3, 1, 1, 1, 2, 2, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 2, 1, 1
Offset: 0

Views

Author

Gus Wiseman, Feb 13 2020

Keywords

Comments

An integer partition is widely alternately co-strongly normal if either it is all 1's (wide) or it covers an initial interval of positive integers (normal) and has weakly increasing run-lengths (co-strong) which, if reversed, are themselves a widely alternately co-strongly normal partition.

Examples

			The a(1) = 1, a(3) = 2, and a(10) = 3 partitions:
  (1)  (21)   (4321)
       (111)  (322111)
              (1111111111)
For example, starting with y = (4,3,2,2,1,1,1) and repeatedly taking run-lengths and reversing gives y -> (3,2,1,1) -> (2,1,1) -> (2,1) -> (1,1). These are all normal, have weakly increasing run-lengths, and the last is all 1's, so y is counted a(14).
		

Crossrefs

Normal partitions are A000009.
Dominated by A317245.
The non-co-strong version is A332277.
The total (instead of alternate) version is A332278.
The Heinz numbers of these partitions are A332290.
The strong version is A332292.
The case of reversed partitions is (also) A332292.
The generalization to compositions is A332340.

Programs

  • Mathematica
    totnQ[ptn_]:=Or[ptn=={},Union[ptn]=={1},And[Union[ptn]==Range[Max[ptn]],LessEqual@@Length/@Split[ptn],totnQ[Reverse[Length/@Split[ptn]]]]];
    Table[Length[Select[IntegerPartitions[n],totnQ]],{n,0,30}]

A332338 Number of alternately co-strong compositions of n.

Original entry on oeis.org

1, 1, 2, 4, 7, 12, 24, 39, 72, 125, 224, 387, 697, 1205, 2141, 3736, 6598, 11516, 20331, 35526, 62507, 109436, 192200, 336533, 590582, 1034187
Offset: 0

Views

Author

Gus Wiseman, Feb 17 2020

Keywords

Comments

A sequence is alternately co-strong if either it is empty, equal to (1), or its run-lengths are weakly increasing (co-strong) and, when reversed, are themselves an alternately co-strong sequence.

Examples

			The a(1) = 1 through a(5) = 12 compositions:
  (1)  (2)   (3)    (4)     (5)
       (11)  (12)   (13)    (14)
             (21)   (22)    (23)
             (111)  (31)    (32)
                    (112)   (41)
                    (121)   (113)
                    (1111)  (131)
                            (212)
                            (221)
                            (1112)
                            (1121)
                            (11111)
For example, starting with the composition y = (1,6,2,2,1,1,1,1) and repeatedly taking run-lengths and reversing gives (1,6,2,2,1,1,1,1) -> (4,2,1,1) -> (2,1,1) -> (2,1) -> (1,1) -> (2). All of these have weakly increasing run-lengths and the last is a singleton, so y is counted under a(15).
		

Crossrefs

The case of partitions is A317256.
The recursive (rather than alternating) version is A332274.
The total (rather than alternating) version is (also) A332274.
The strong version is this same sequence.
The case of reversed partitions is A332339.
The normal version is A332340(n) + 1 for n > 1.

Programs

  • Mathematica
    tniQ[q_]:=Or[q=={},q=={1},And[LessEqual@@Length/@Split[q],tniQ[Reverse[Length/@Split[q]]]]];
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],tniQ]],{n,0,10}]

A332274 Number of totally strong compositions of n.

Original entry on oeis.org

1, 1, 2, 4, 7, 11, 22, 33, 56, 93, 162, 264, 454, 765, 1307, 2237, 3849, 6611, 11472, 19831, 34446, 59865, 104293, 181561, 316924
Offset: 0

Views

Author

Gus Wiseman, Feb 11 2020

Keywords

Comments

A sequence is totally strong if either it is empty, equal to (1), or its run-lengths are weakly decreasing (strong) and are themselves a totally strong sequence.
A composition of n is a finite sequence of positive integers with sum n.
Also the number of totally co-strong compositions of n.

Examples

			The a(1) = 1 through a(5) = 11 compositions:
  (1)  (2)   (3)    (4)     (5)
       (11)  (12)   (13)    (14)
             (21)   (22)    (23)
             (111)  (31)    (32)
                    (121)   (41)
                    (211)   (122)
                    (1111)  (131)
                            (212)
                            (311)
                            (2111)
                            (11111)
		

Crossrefs

The case of partitions is A316496.
The co-strong case is A332274 (this sequence).
The case of reversed partitions is A332275.
The alternating version is A332338.

Programs

  • Mathematica
    tni[q_]:=Or[q=={},q=={1},And[GreaterEqual@@Length/@Split[q],tni[Length/@Split[q]]]];
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],tni]],{n,0,15}]

A335377 Heinz numbers of non-totally co-strong integer partitions.

Original entry on oeis.org

18, 50, 54, 60, 75, 84, 90, 98, 108, 120, 126, 132, 140, 147, 150, 156, 162, 168, 198, 204, 220, 228, 234, 240, 242, 245, 250, 260, 264, 270, 276, 280, 294, 300, 306, 308, 312, 315, 324, 336, 338, 340, 342, 348, 350, 363, 364, 372, 375, 378, 380, 408, 414, 420
Offset: 1

Views

Author

Gus Wiseman, Jun 05 2020

Keywords

Comments

A sequence is totally co-strong if it is empty, equal to (1), or its run-lengths are weakly increasing (co-strong) and are themselves a totally co-strong sequence.
The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.

Examples

			The sequence of terms together with their prime indices begins:
   18: {1,2,2}        156: {1,1,2,6}        276: {1,1,2,9}
   50: {1,3,3}        162: {1,2,2,2,2}      280: {1,1,1,3,4}
   54: {1,2,2,2}      168: {1,1,1,2,4}      294: {1,2,4,4}
   60: {1,1,2,3}      198: {1,2,2,5}        300: {1,1,2,3,3}
   75: {2,3,3}        204: {1,1,2,7}        306: {1,2,2,7}
   84: {1,1,2,4}      220: {1,1,3,5}        308: {1,1,4,5}
   90: {1,2,2,3}      228: {1,1,2,8}        312: {1,1,1,2,6}
   98: {1,4,4}        234: {1,2,2,6}        315: {2,2,3,4}
  108: {1,1,2,2,2}    240: {1,1,1,1,2,3}    324: {1,1,2,2,2,2}
  120: {1,1,1,2,3}    242: {1,5,5}          336: {1,1,1,1,2,4}
  126: {1,2,2,4}      245: {3,4,4}          338: {1,6,6}
  132: {1,1,2,5}      250: {1,3,3,3}        340: {1,1,3,7}
  140: {1,1,3,4}      260: {1,1,3,6}        342: {1,2,2,8}
  147: {2,4,4}        264: {1,1,1,2,5}      348: {1,1,2,10}
  150: {1,2,3,3}      270: {1,2,2,2,3}      350: {1,3,3,4}
For example, 60 is the Heinz number of (3,2,1,1), which has run-lengths: (1,1,2) -> (2,1) -> (1,1) -> (2) -> (1). Since (2,1) is not weakly increasing, 60 is in the sequence.
		

Crossrefs

Partitions with weakly increasing run-lengths are counted by A100883.
Totally strong partitions are counted by A316496.
Heinz numbers of totally strong partitions are A316529.
The version for reversed partitions is A316597.
The strong version is (also) A316597.
The alternating version is A317258.
Totally co-strong partitions are counted by A332275.
The complement is A335376.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    totcostrQ[q_]:=Or[Length[q]<=1,And[OrderedQ[Length/@Split[q]],totcostrQ[Length/@Split[q]]]];
    Select[Range[100],!totcostrQ[Reverse[primeMS[#]]]&]

A334969 Heinz numbers of alternately strong integer partitions.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 14, 15, 16, 17, 18, 19, 21, 22, 23, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 41, 42, 43, 46, 47, 49, 50, 51, 53, 54, 55, 57, 58, 59, 61, 62, 64, 65, 66, 67, 69, 70, 71, 73, 74, 75, 77, 78, 79, 81, 82, 83
Offset: 1

Views

Author

Gus Wiseman, Jun 09 2020

Keywords

Comments

First differs from A304678 in lacking 450.
First differs from A316529 (the totally strong version) in having 150.
A sequence is alternately strong if either it is empty, equal to (1), or its run-lengths are weakly decreasing (strong) and, when reversed, are themselves an alternately strong sequence.
The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.

Examples

			The sequence does not contain 450, the Heinz number of (3,3,2,2,1), because, while the multiplicities are weakly decreasing, their reverse (1,2,2) does not have weakly decreasing multiplicities.
		

Crossrefs

The co-strong version is A317257.
The case of reversed partitions is (also) A317257.
The total version is A316529.
These partitions are counted by A332339.
Totally co-strong partitions are counted by A332275.
Alternately co-strong compositions are counted by A332338.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    altstrQ[q_]:=Or[q=={},q=={1},And[GreaterEqual@@Length/@Split[q],altstrQ[Reverse[Length/@Split[q]]]]];
    Select[Range[100],altstrQ[Reverse[primeMS[#]]]&]
Showing 1-9 of 9 results.