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

A304405 Number of partitions of n in which the sequence of the sum of the same summands is nondecreasing.

Original entry on oeis.org

1, 1, 2, 3, 5, 6, 10, 12, 18, 22, 31, 37, 52, 61, 80, 97, 127, 147, 189, 220, 277, 325, 402, 469, 578, 665, 804, 933, 1121, 1282, 1537, 1754, 2081, 2374, 2793, 3179, 3739, 4232, 4923, 5587, 6477, 7305, 8445, 9519, 10949, 12323, 14110, 15825, 18099, 20229, 23005
Offset: 0

Views

Author

Seiichi Manyama, May 12 2018

Keywords

Comments

Number of integer partitions of n with weakly decreasing run-sums, complement A357878. - Gus Wiseman, Oct 22 2022

Examples

			n |                      | Sequence of the sum of the same summands
--+----------------------+-----------------------------------------
1 | 1                    | 1
2 | 2                    | 2
  | 1+1                  | 2
3 | 3                    | 3
  | 2+1                  | 1, 2
  | 1+1+1                | 3
4 | 4                    | 4
  | 3+1                  | 1, 3
  | 2+2                  | 4
  | 2+1+1                | 2, 2
  | 1+1+1+1              | 4
5 | 5                    | 5
  | 4+1                  | 1, 4
  | 3+2                  | 2, 3
  | 3+1+1                | 2, 3
  | 2+2+1                | 1, 4
  | 1+1+1+1+1            | 5
6 | 6                    | 6
  | 5+1                  | 1, 5
  | 4+2                  | 2, 4
  | 4+1+1                | 2, 4
  | 3+3                  | 6
  | 3+2+1                | 1, 2, 3
  | 3+1+1+1              | 3, 3
  | 2+2+2                | 6
  | 2+2+1+1              | 2, 4
  | 1+1+1+1+1+1          | 6
		

Crossrefs

The strict opposite version is A304430, ranked by A357864.
The strict version is A304428, ranked by A357862.
The opposite version is A304406, ranked by A357861.
Number of rows in A354584 summing to n that are strictly increasing.
These partitions are ranked by A357875.
A000041 counts integer partitions, strict A000009.
A304442 counts partitions with equal run-sums, distinct A353837.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],GreaterEqual@@Total/@Split[#]&]],{n,0,30}] (* Gus Wiseman, Oct 22 2022 *)

A357876 The run-sums of the prime indices of n are not weakly increasing.

Original entry on oeis.org

24, 45, 48, 80, 90, 96, 120, 135, 160, 168, 175, 180, 189, 192, 224, 240, 264, 270, 275, 288, 297, 312, 315, 320, 336, 350, 360, 378, 384, 405, 408, 448, 456, 480, 495, 525, 528, 539, 540, 550, 552, 560, 567, 576, 585, 594, 600, 624, 630, 637, 640, 672, 696
Offset: 1

Views

Author

Gus Wiseman, Oct 17 2022

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.
The sequence of runs of a sequence consists of its maximal consecutive constant subsequences when read left-to-right. 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 terms together with their prime indices begin:
   24: {1,1,1,2}
   45: {2,2,3}
   48: {1,1,1,1,2}
   80: {1,1,1,1,3}
   90: {1,2,2,3}
   96: {1,1,1,1,1,2}
  120: {1,1,1,2,3}
  135: {2,2,2,3}
  160: {1,1,1,1,1,3}
  168: {1,1,1,2,4}
  175: {3,3,4}
  180: {1,1,2,2,3}
  189: {2,2,2,4}
  192: {1,1,1,1,1,1,2}
For example, the prime indices of 24 are (1,1,1,2), with run-sums (3,2), which are not weakly increasing, so 24 is in the sequence.
		

Crossrefs

These are the indices of rows in A354584 that are not weakly increasing.
The complement is A357875.
These partitions are counted by A357878.
A001222 counts prime factors, distinct A001221.
A056239 adds up prime indices, row sums of A112798.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Select[Range[100],!LessEqual@@Total/@Split[primeMS[#]]&]

A357850 Numbers whose prime indices do not have weakly decreasing run-sums. Heinz numbers of the partitions counted by A357865.

Original entry on oeis.org

6, 10, 14, 15, 18, 20, 21, 22, 26, 28, 30, 33, 34, 35, 36, 38, 39, 42, 44, 46, 50, 51, 52, 54, 55, 56, 57, 58, 60, 62, 65, 66, 68, 69, 70, 72, 74, 75, 76, 77, 78, 82, 84, 85, 86, 87, 88, 90, 91, 92, 93, 94, 95, 98, 99, 100, 102, 104, 105, 106, 108, 110, 111
Offset: 1

Views

Author

Gus Wiseman, Oct 19 2022

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.
The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.
The sequence of runs of a sequence consists of its maximal consecutive constant subsequences when read left-to-right. 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 terms together with their prime indices begin:
    6: {1,2}
   10: {1,3}
   14: {1,4}
   15: {2,3}
   18: {1,2,2}
   20: {1,1,3}
   21: {2,4}
   22: {1,5}
   26: {1,6}
   28: {1,1,4}
   30: {1,2,3}
   33: {2,5}
   34: {1,7}
   35: {3,4}
   36: {1,1,2,2}
   38: {1,8}
   39: {2,6}
   42: {1,2,4}
		

Crossrefs

These are the indices of rows in A354584 that are not weakly decreasing.
The complement is A357861, counted by A304406.
These partitions are counted by A357865.
The opposite (not weakly increasing) version is A357876, counted by A357878.
A001222 counts prime factors, distinct A001221.
A056239 adds up prime indices, row sums of A112798.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Select[Range[100],!GreaterEqual@@Total/@Split[primeMS[#]]&]

A357865 Number of integer partitions of n whose run-sums are not weakly increasing.

Original entry on oeis.org

0, 0, 0, 1, 1, 4, 5, 10, 13, 22, 31, 45, 57, 85, 115, 155, 199, 267, 344, 452, 577, 744, 940, 1191, 1486, 1877, 2339, 2910, 3595, 4442, 5453, 6688, 8162, 9960, 12089, 14662, 17698, 21365, 25703, 30869, 36961, 44207, 52728, 62801, 74644, 88587, 104930, 124113
Offset: 0

Views

Author

Gus Wiseman, Oct 19 2022

Keywords

Comments

The sequence of runs of a sequence consists of its maximal consecutive constant subsequences when read left-to-right. 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(8) = 13 partitions:
  .  .  .  (21)  (31)  (32)   (42)    (43)     (53)
                       (41)   (51)    (52)     (62)
                       (221)  (321)   (61)     (71)
                       (311)  (411)   (331)    (332)
                              (2211)  (421)    (431)
                                      (511)    (521)
                                      (2221)   (611)
                                      (3211)   (3221)
                                      (4111)   (3311)
                                      (22111)  (4211)
                                               (5111)
                                               (22211)
                                               (32111)
		

Crossrefs

The complement is counted by A304406, ranked by A357861.
Number of rows in A354584 summing to n that are not weakly decreasing.
These partitions are ranked by A357850.
The opposite (not weakly decreasing) version is A357878, ranked by A357876.
A000041 counts integer partitions, strict A000009.
A304442 counts partitions with equal run-sums, distinct A353837.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],!LessEqual@@Total/@Split[#]&]],{n,0,30}]

A357863 Numbers whose prime indices do not have strictly increasing run-sums. Heinz numbers of the partitions not counted by A304428.

Original entry on oeis.org

12, 24, 40, 45, 48, 60, 63, 80, 84, 90, 96, 112, 120, 126, 132, 135, 144, 156, 160, 168, 175, 180, 189, 192, 204, 224, 228, 240, 252, 264, 270, 275, 276, 280, 288, 297, 300, 312, 315, 320, 325, 336, 348, 350, 351, 352, 360, 372, 378, 384, 405, 408, 420, 440
Offset: 1

Views

Author

Gus Wiseman, Oct 19 2022

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.
The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.
The sequence of runs of a sequence consists of its maximal consecutive constant subsequences when read left-to-right. 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 terms together with their prime indices begin:
   12: {1,1,2}
   24: {1,1,1,2}
   40: {1,1,1,3}
   45: {2,2,3}
   48: {1,1,1,1,2}
   60: {1,1,2,3}
   63: {2,2,4}
   80: {1,1,1,1,3}
   84: {1,1,2,4}
   90: {1,2,2,3}
   96: {1,1,1,1,1,2}
  112: {1,1,1,1,4}
  120: {1,1,1,2,3}
  126: {1,2,2,4}
  132: {1,1,2,5}
  135: {2,2,2,3}
  144: {1,1,1,1,2,2}
  156: {1,1,2,6}
		

Crossrefs

These are the indices of rows in A354584 that are not strictly increasing.
The complement (strictly increasing) is A357862, counted by A304428.
The weak (not weakly increasing) version is A357876, counted by A357878.
A001222 counts prime factors, distinct A001221.
A056239 adds up prime indices, row sums of A112798.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Select[Range[100],!Less@@Total/@Split[primeMS[#]]&]
Showing 1-5 of 5 results.