A304465 -id:A304465 - cp's OEIS frontend

A353858 Number of integer compositions of n with run-sum trajectory ending in a singleton.

0, 1, 2, 2, 5, 2, 8, 2, 20, 5, 8, 2, 78, 2, 8, 8, 223, 2, 179, 2, 142, 8, 8, 2, 4808

Offset: 0

Gus Wiseman, Jun 17 2022

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). The run-sum trajectory is obtained by repeatedly taking the run-sums (cf. A353847) until an anti-run composition (A003242) is reached. For example, the composition (2,2,1,1,2) is counted under a(8) because it has the following run-sum trajectory: (2,2,1,1,2) -> (4,2,2) -> (4,4) -> (8).

			The a(0) = 0 through a(8) = 20 compositions:
  .  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
          (11)  (111)  (22)    (11111)  (33)      (1111111)  (44)
                       (112)            (222)                (224)
                       (211)            (1113)               (422)
                       (1111)           (2112)               (1124)
                                        (3111)               (2114)
                                        (11211)              (2222)
                                        (111111)             (4112)
                                                             (4211)
                                                             (11114)
                                                             (21122)
                                                             (22112)
                                                             (41111)
                                                             (111122)
                                                             (112112)
                                                             (211211)
                                                             (221111)
                                                             (1111211)
                                                             (1121111)
                                                             (11111111)

The version for partitions is A353845, ranked by A353844.
The trajectory itself is A353853, last part A353855.
The lengths of trajectories of standard compositions are A353854.
This is column k = 1 of A353856, for partitions A353843.
These compositions are ranked by A353857.
A011782 counts compositions.
A066099 lists compositions in standard order.
A238279 and A333755 count compositions by number of runs.
A275870 counts collapsible partitions, ranked by A300273.
A333489 ranks anti-runs, counted by A003242 (complement A261983).
A353840-A353846 pertain to partition run-sum trajectory.
A353847 represents the run-sums of a composition, partitions A353832.
A353851 counts compositions with equal run-sums, ranked by A353848.
A353859 counts compositions by length of run-sum trajectory.
A353860 counts collapsible compositions.
A353932 lists run-sums of standard compositions.
Cf. A072639, A237685, A304442, A304465, A318928, A353833, A353841, A353849, A353850, A353852.

Table[Length[Select[Join@@Permutations/@ IntegerPartitions[n], Length[FixedPoint[Total/@Split[#]&,#]]==1&]],{n,0,15}]

A325247 Numbers whose omega-sequence is strict (no repeated parts).

Original entry on oeis.org

1, 2, 3, 4, 5, 7, 8, 9, 11, 13, 16, 17, 19, 23, 25, 27, 29, 31, 32, 36, 37, 41, 43, 47, 49, 53, 59, 61, 64, 67, 71, 73, 79, 81, 83, 89, 97, 100, 101, 103, 107, 109, 113, 121, 125, 127, 128, 131, 137, 139, 149, 151, 157, 163, 167, 169, 173, 179, 181, 191, 193

Offset: 1

Gus Wiseman, Apr 16 2019

nonn

First differs from A323306 in having 216.
We define the omega-sequence of n (row n of A323023) to have length A323014(n) = adjusted frequency depth of n, and the k-th term is Omega(red^{k-1}(n)), where Omega = A001222 and red^{k} is the k-th functional iteration of red = A181819, defined by red(n = p^i*...*q^j) = prime(i)*...*prime(j) = product of primes indexed by the prime exponents of n. For example, we have 180 -> 18 -> 6 -> 4 -> 3, so the omega-sequence of 180 is (5,3,2,2,1).
Also Heinz numbers of integer partitions of whose omega-sequence is strict (counted by A325250). The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k).

			The sequence of terms together with their prime indices begins:
     1: {}
     2: {1}
     3: {2}
     4: {1,1}
     5: {3}
     7: {4}
     8: {1,1,1}
     9: {2,2}
    11: {5}
    13: {6}
    16: {1,1,1,1}
    17: {7}
    19: {8}
    23: {9}
    25: {3,3}
    27: {2,2,2}
    29: {10}
    31: {11}
    32: {1,1,1,1,1}
    36: {1,1,2,2}

Positions of squarefree numbers in A325248.
Cf. A056239, A112798, A118914, A181819, A323023, A325249, A325250, A325251, A325277.
Omega-sequence statistics: A001221 (second omega), A001222 (first omega), A071625 (third omega), A304465 (second-to-last omega), A182850 or A323014 (depth), A323022 (fourth omega), A325248 (Heinz number).

omseq[n_Integer]:=If[n<=1,{},Total/@NestWhileList[Sort[Length/@Split[#1]]&,Sort[Last/@FactorInteger[n]],Total[#]>1&]];
Select[Range[100],UnsameQ@@omseq[#]&]

A353842 Last part of the trajectory of the partition run-sum transformation of n, using Heinz numbers.

Original entry on oeis.org

1, 2, 3, 3, 5, 6, 7, 5, 7, 10, 11, 7, 13, 14, 15, 7, 17, 14, 19, 15, 21, 22, 23, 15, 13, 26, 13, 21, 29, 30, 31, 11, 33, 34, 35, 21, 37, 38, 39, 13, 41, 42, 43, 33, 35, 46, 47, 21, 19, 26, 51, 39, 53, 26, 55, 35, 57, 58, 59, 35, 61, 62, 19, 13, 65, 66, 67, 51

Offset: 1

Gus Wiseman, May 25 2022

nonn

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 run-sum trajectory is obtained by repeatedly taking the run-sum transformation (A353832) until a squarefree number is reached. For example, the trajectory 12 -> 9 -> 7 corresponds to the partitions (2,1,1) -> (2,2) -> (4).

			The partition run-sum trajectory of 87780 is: 87780 -> 65835 -> 51205 -> 19855 -> 2915, so a(87780) = 2915.

The fixed points and image are A005117.
For run-lengths instead of sums we have A304464/A304465, counted by A325268.
These are the row-ends of A353840.
Other sequences pertaining to partition trajectory are A353841-A353846.
The version for compositions is A353855, run-ends of A353853.
A001222 counts prime factors, distinct A001221.
A056239 adds up prime indices, row sums of A112798 and A296150.
A182850 and A323014 give frequency depth.
A300273 ranks collapsible partitions, counted by A275870.
A353832 represents the operation of taking run-sums of a partition.
A353833 ranks partitions with all equal run-sums, counted by A304442.
A353835 counts distinct run-sums of prime indices, weak A353861.
A353866 ranks rucksack partitions, counted by A353864.
Cf. A071625, A073093, A181819, A325239, A325277, A353834, A353838, A353847, A353865, A353867.

Table[NestWhile[Times@@Prime/@Cases[If[#==1,{},FactorInteger[#]],{p_,k_}:>PrimePi[p]*k]&,n,!SquareFreeQ[#]&],{n,100}]

A325264 Numbers whose omega-sequence sums to 7.

Original entry on oeis.org

30, 36, 42, 64, 66, 70, 78, 100, 102, 105, 110, 114, 130, 138, 154, 165, 170, 174, 182, 186, 190, 195, 196, 222, 225, 230, 231, 238, 246, 255, 258, 266, 273, 282, 285, 286, 290, 310, 318, 322, 345, 354, 357, 366, 370, 374, 385, 399, 402, 406, 410, 418, 426

Offset: 1

Gus Wiseman, Apr 18 2019

nonn

We define the omega-sequence of n (row n of A323023) to have length A323014(n) = adjusted frequency depth of n, and the k-th term is Omega(red^{k-1}(n)), where Omega = A001222 and red^{k} is the k-th functional iteration of red = A181819, defined by red(n = p^i*...*q^j) = prime(i)*...*prime(j) = product of primes indexed by the prime exponents of n. For example, we have 180 -> 18 -> 6 -> 4 -> 3, so the omega-sequence of 180 is (5,3,2,2,1).

			The sequence of terms together with their prime indices and omega-sequences begins:
   30: {1,2,3} (3,3,1)
   36: {1,1,2,2} (4,2,1)
   42: {1,2,4} (3,3,1)
   64: {1,1,1,1,1,1} (6,1)
   66: {1,2,5} (3,3,1)
   70: {1,3,4} (3,3,1)
   78: {1,2,6} (3,3,1)
  100: {1,1,3,3} (4,2,1)
  102: {1,2,7} (3,3,1)
  105: {2,3,4} (3,3,1)
  110: {1,3,5} (3,3,1)
  114: {1,2,8} (3,3,1)
  130: {1,3,6} (3,3,1)
  138: {1,2,9} (3,3,1)
  154: {1,4,5} (3,3,1)
  165: {2,3,5} (3,3,1)
  170: {1,3,7} (3,3,1)
  174: {1,2,10} (3,3,1)
  182: {1,4,6} (3,3,1)
  186: {1,2,11} (3,3,1)
  190: {1,3,8} (3,3,1)
  195: {2,3,6} (3,3,1)
  196: {1,1,4,4} (4,2,1)

Positions of 7's in A325249.
Numbers with omega-sequence summing to m: A000040 (m = 1), A001248 (m = 3), A030078 (m = 4), A068993 (m = 5), A050997 (m = 6), A325264 (m = 7).
Cf. A056239, A060687, A062770, A118914, A130091, A303555, A323023, A325238, A325265, A325277.
Omega-sequence statistics: A001222 (first omega), A001221 (second omega), A071625 (third omega), A323022 (fourth omega), A304465 (second-to-last omega), A182850 or A323014 (length/frequency depth), A325248 (Heinz number), A325249 (sum).

omseq[n_Integer]:=If[n<=1,{},Total/@NestWhileList[Sort[Length/@Split[#]]&,Sort[Last/@FactorInteger[n]],Total[#]>1&]];
Select[Range[100],Total[omseq[#]]==7&]

A325281 Numbers of the form ab, aab, or aabc where a, b, and c are distinct primes. Numbers with sorted prime signature (1,1), (1,2), or (1,1,2).

Original entry on oeis.org

6, 10, 12, 14, 15, 18, 20, 21, 22, 26, 28, 33, 34, 35, 38, 39, 44, 45, 46, 50, 51, 52, 55, 57, 58, 60, 62, 63, 65, 68, 69, 74, 75, 76, 77, 82, 84, 85, 86, 87, 90, 91, 92, 93, 94, 95, 98, 99, 106, 111, 115, 116, 117, 118, 119, 122, 123, 124, 126, 129, 132

Offset: 1

Gus Wiseman, Apr 18 2019

nonn

Also numbers whose adjusted frequency depth is one plus their number of prime factors counted with multiplicity. The adjusted frequency depth of a positive integer n is 0 if n = 1, and otherwise it is one plus the number of times one must apply A181819 to reach a prime number, where A181819(k = p^i*...*q^j) = prime(i)*...*prime(j) = product of primes indexed by the prime exponents of k. For example, 180 has adjusted frequency depth 5 because we have: 180 -> 18 -> 6 -> 4 -> 3.

The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k), so these are Heinz numbers of integer partitions whose adjusted frequency depth is equal to their length plus 1. The enumeration of these partitions by sum is given by A127002.

			The sequence of terms together with their prime indices and their omega-sequences (see A323023) begins:
   6:     {1,2} (2,2,1)
  10:     {1,3} (2,2,1)
  12:   {1,1,2} (3,2,2,1)
  14:     {1,4} (2,2,1)
  15:     {2,3} (2,2,1)
  18:   {1,2,2} (3,2,2,1)
  20:   {1,1,3} (3,2,2,1)
  21:     {2,4} (2,2,1)
  22:     {1,5} (2,2,1)
  26:     {1,6} (2,2,1)
  28:   {1,1,4} (3,2,2,1)
  33:     {2,5} (2,2,1)
  34:     {1,7} (2,2,1)
  35:     {3,4} (2,2,1)
  38:     {1,8} (2,2,1)
  39:     {2,6} (2,2,1)
  44:   {1,1,5} (3,2,2,1)
  45:   {2,2,3} (3,2,2,1)
  46:     {1,9} (2,2,1)
  50:   {1,3,3} (3,2,2,1)
  51:     {2,7} (2,2,1)
  52:   {1,1,6} (3,2,2,1)
  55:     {3,5} (2,2,1)
  57:     {2,8} (2,2,1)
  58:    {1,10} (2,2,1)
  60: {1,1,2,3} (4,3,2,2,1)

Cf. A056239, A112798, A118914, A127002, A181819, A323023, A325246, A325259, A325266, A325270, A325277, A325282.

Omega-sequence statistics: A001222 (first omega), A001221 (second omega), A071625 (third omega), A323022 (fourth omega), A304465 (second-to-last omega), A182850 or A323014 (length/frequency depth), A325248 (Heinz number), A325249 (sum).

fdadj[n_Integer]:=If[n==1,0,Length[NestWhileList[Times@@Prime/@Last/@FactorInteger[#]&,n,!PrimeQ[#]&]]];
Select[Range[100],fdadj[#]==PrimeOmega[#]+1&]

A353844 Starting with the multiset of prime indices of n, repeatedly take the multiset of run-sums until you reach a squarefree number. This number is prime (or 1) iff n belongs to the sequence.

Original entry on oeis.org

1, 2, 3, 4, 5, 7, 8, 9, 11, 12, 13, 16, 17, 19, 23, 25, 27, 29, 31, 32, 37, 40, 41, 43, 47, 49, 53, 59, 61, 63, 64, 67, 71, 73, 79, 81, 83, 84, 89, 97, 101, 103, 107, 109, 112, 113, 121, 125, 127, 128, 131, 137, 139, 144, 149, 151, 157, 163, 167, 169, 173, 179

Offset: 1

Gus Wiseman, May 26 2022

nonn

The run-sums transformation is described by Kimberling at A237685 and A237750.
The runs of a sequence are its maximal consecutive constant subsequences. For example, the runs of {1,1,1,2,2,3,4} are {1,1,1}, {2,2}, {3}, {4}, with sums {3,3,4,4}.
Note that the Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k), so this sequence lists Heinz numbers of partitions whose run-sum trajectory reaches an empty set or singleton.

			The terms together with their prime indices begin:
      1: {}            25: {3,3}           64: {1,1,1,1,1,1}
      2: {1}           27: {2,2,2}         67: {19}
      3: {2}           29: {10}            71: {20}
      4: {1,1}         31: {11}            73: {21}
      5: {3}           32: {1,1,1,1,1}     79: {22}
      7: {4}           37: {12}            81: {2,2,2,2}
      8: {1,1,1}       40: {1,1,1,3}       83: {23}
      9: {2,2}         41: {13}            84: {1,1,2,4}
     11: {5}           43: {14}            89: {24}
     12: {1,1,2}       47: {15}            97: {25}
     13: {6}           49: {4,4}          101: {26}
     16: {1,1,1,1}     53: {16}           103: {27}
     17: {7}           59: {17}           107: {28}
     19: {8}           61: {18}           109: {29}
     23: {9}           63: {2,2,4}        112: {1,1,1,1,4}
The trajectory 60 -> 45 -> 35 ends in a nonprime number 35, so 60 is not in the sequence.
The trajectory 84 -> 63 -> 49 -> 19 ends in a prime number 19, so 84 is in the sequence.

This sequence is a subset of A300273, counted by A275870.
The version for compositions is A353857, counted by A353847.
A001222 counts prime factors, distinct A001221.
A056239 adds up prime indices, row sums of A112798 and A296150.
A124010 gives prime signature, sorted A118914.
A304442 counts partitions with all equal run-sums.
A353851 counts compositions with all equal run-sums, ranked by A353848.
A325268 counts partitions by omicron, rank statistic A304465.
A353832 represents the operation of taking run-sums of a partition.
A353833 ranks partitions with all equal run-sums, nonprime A353834.
A353835 counts distinct run-sums of prime indices, weak A353861.
A353838 ranks partitions with all distinct run-sums, counted by A353837.
A353840-A353846 pertain to partition run-sum trajectory.
A353853-A353859 pertain to composition run-sum trajectory.
A353866 ranks rucksack partitions, counted by A353864.
Cf. A005811, A073093, A130091, A181819, A182857, A304660, A325239, A325277, A353839, A353862, A353867.

ope[n_]:=Times@@Prime/@Cases[If[n==1,{},FactorInteger[n]],{p_,k_}:>PrimePi[p]*k];
Select[Range[100],#==1||PrimeQ[NestWhile[ope,#,!SquareFreeQ[#]&]]&]

A353845 Number of integer partitions of n such that if you repeatedly take the multiset of run-sums (or condensation), you eventually reach an empty set or singleton.

Original entry on oeis.org

1, 1, 2, 2, 4, 2, 5, 2, 8, 3, 5, 2, 15, 2, 5, 4, 18, 2, 13, 2, 14, 4, 5, 2, 62, 3, 5, 5, 14, 2, 18, 2, 48, 4, 5, 4, 71, 2, 5, 4, 54, 2, 18, 2, 14, 10, 5, 2, 374, 3, 9, 4, 14, 2, 37, 4, 54, 4, 5, 2, 131

Offset: 0

Gus Wiseman, May 26 2022

nonn

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

			The a(1) = 1 through a(8) = 8 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (111)  (22)    (11111)  (33)      (1111111)  (44)
                    (211)            (222)                (422)
                    (1111)           (3111)               (2222)
                                     (111111)             (4211)
                                                          (41111)
                                                          (221111)
                                                          (11111111)
For example, the partition (3,2,2,2,1,1,1) has trajectory: (1,1,1,2,2,2,3) -> (3,3,6) -> (6,6) -> (12), so is counted under a(12).

Mathematics Stack Exchange, What is a sequence run? (answered 2011-12-01)

Dominated by A018818 (partitions into divisors).
The version for compositions is A353858.
A275870 counts collapsible partitions, ranked by A300273.
A304442 counts partitions with all equal run-sums, ranked by A353833.
A325268 counts partitions by omicron, rank statistic A304465.
A353832 represents the operation of taking run-sums of a partition.
A353837 counts partitions with all distinct run-sums, ranked by A353838.
A353840-A353846 pertain to partition run-sum trajectory.
A353847-A353859 pertain to composition run-sum trajectory.
A353864 counts rucksack partitions, ranked by A353866.
Cf. A000041, A008284, A181819, A225485, A325239, A325277, A325280, A326370, A353834, A353839, A353865.

Table[Length[Select[IntegerPartitions[n], Length[NestWhile[Sort[Total/@Split[#]]&,#,!UnsameQ@@#&]]<=1&]],{n,0,30}]

A320118 a(1) = a(2) = 1; for n > 2, a(n) = A181819(n) * a(A181819(n)).

Original entry on oeis.org

1, 1, 2, 6, 2, 24, 2, 10, 6, 24, 2, 144, 2, 24, 24, 14, 2, 144, 2, 144, 24, 24, 2, 240, 6, 24, 10, 144, 2, 80, 2, 22, 24, 24, 24, 54, 2, 24, 24, 240, 2, 80, 2, 144, 144, 24, 2, 336, 6, 144, 24, 144, 2, 240, 24, 240, 24, 24, 2, 1728, 2, 24, 144, 26, 24, 80, 2, 144, 24, 80, 2, 360, 2, 24, 144, 144, 24, 80, 2, 336, 14, 24, 2, 1728

Offset: 1

Antti Karttunen, Nov 24 2018

nonn

Antti Karttunen, Table of n, a(n) for n = 1..10080

Cf. A181819, A182850.

Cf. also A304465, A320016.

Nest[Append[#1, #2 #1[[#2]] ] & @@ {#, Times @@ Prime@ FactorInteger[Length@ # + 1][[All, -1]]} &, {1, 1}, 82] (* Michael De Vlieger, Nov 25 2018 *)

A181819(n) = factorback(apply(e->prime(e),(factor(n)[,2])));
A320118(n) = if(n<=2,1,A181819(n)*A320118(A181819(n)));

a(1) = a(2) = 1; for n > 2, a(n) = A181819(n) * a(A181819(n)).

A325416 Least k such that the omega-sequence of k sums to n, and 0 if none exists.

Original entry on oeis.org

1, 2, 0, 4, 8, 6, 32, 30, 12, 24, 48, 96, 60, 120, 240, 480, 960, 1920, 3840, 2520, 5040, 10080, 20160, 40320, 80640

Offset: 0

Gus Wiseman, Apr 25 2019

nonn

We define the omega-sequence of n (row n of A323023) to have length A323014(n) = adjusted frequency depth of n, and the k-th term is Omega(red^{k-1}(n)), where Omega = A001222 and red^{k} is the k-th functional iteration of red = A181819, defined by red(n = p^i*...*q^j) = prime(i)*...*prime(j) = product of primes indexed by the prime exponents of n. For example, we have 180 -> 18 -> 6 -> 4 -> 3, so the omega-sequence of 180 is (5,3,2,2,1) with sum 13.

			The sequence of terms together with their omega-sequences (n = 2 term not shown) begins:
     1:
     2:  1
     4:  2 1
     8:  3 1
     6:  2 2 1
    32:  5 1
    30:  3 3 1
    12:  3 2 2 1
    24:  4 2 2 1
    48:  5 2 2 1
    96:  6 2 2 1
    60:  4 3 2 2 1
   120:  5 3 2 2 1
   240:  6 3 2 2 1
   480:  7 3 2 2 1
   960:  8 3 2 2 1
  1920:  9 3 2 2 1
  3840: 10 3 2 2 1
  2520:  7 4 3 2 2 1
  5040:  8 4 3 2 2 1

Cf. A056239, A181819, A181821, A304465, A307734, A323023, A325238, A325277, A325280, A325413, A325415.

Omega-sequence statistics: A001222 (first omega), A001221 (second omega), A071625 (third omega), A323022 (fourth omega), A304465 (second-to-last omega), A182850 or A323014 (frequency depth), A325248 (Heinz number), A325249 (sum).

omseq[n_Integer]:=If[n<=1,{},Total/@NestWhileList[Sort[Length/@Split[#]]&,Sort[Last/@FactorInteger[n]],Total[#]>1&]];
da=Table[Total[omseq[n]],{n,10000}];
Table[If[!MemberQ[da,k],0,Position[da,k][[1,1]]],{k,0,Max@@da}]

A353856 Triangle read by rows where T(n,k) is the number of integer compositions of n with run-sum trajectory (condensation) ending in a composition of length k.

Original entry on oeis.org

1, 0, 1, 0, 2, 0, 0, 2, 2, 0, 0, 5, 2, 1, 0, 0, 2, 12, 2, 0, 0, 0, 8, 10, 12, 2, 0, 0, 0, 2, 32, 23, 6, 1, 0, 0, 0, 20, 26, 51, 28, 3, 0, 0, 0, 0, 5, 66, 109, 52, 22, 2, 0, 0, 0, 0, 8, 108, 144, 188, 53, 10, 1, 0, 0, 0, 0, 2, 134, 358, 282, 196, 48, 4, 0, 0, 0, 0

Offset: 0

Gus Wiseman, Jun 01 2022

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). The run-sum trajectory is obtained by repeatedly taking the run-sums transformation (or condensation, represented by A353847) until an anti-run is reached. For example, the trajectory (2,1,1,3,1,1,2,1,1,2,1) -> (2,2,3,2,2,2,2,1) -> (4,3,8,1) is counted under T(15,4).

			Triangle begins:
   1
   0   1
   0   2   0
   0   2   2   0
   0   5   2   1   0
   0   2  12   2   0   0
   0   8  10  12   2   0   0
   0   2  32  23   6   1   0   0
   0  20  26  51  28   3   0   0   0
   0   5  66 109  52  22   2   0   0   0
   0   8 108 144 188  53  10   1   0   0   0
   0   2 134 358 282 196  48   4   0   0   0   0
For example, row n = 6 counts the following compositions:
  .  (6)       (15)     (123)    (1212)  .  .
     (33)      (24)     (132)    (2121)
     (222)     (42)     (141)
     (1113)    (51)     (213)
     (2112)    (114)    (231)
     (3111)    (411)    (312)
     (11211)   (1122)   (321)
     (111111)  (2211)   (1131)
               (11112)  (1221)
               (21111)  (1311)
                        (11121)
                        (12111)

Row sums are A011782.
Row-lengths without zeros appear to be A131737.
The version for partitions is A353843.
The length of the trajectory is A353854, firsts A072639, partitions A353841.
The last part of the same trajectory is A353855.
Column k = 1 is A353858.
A066099 lists compositions in standard order.
A318928 gives runs-resistance of binary expansion.
A325268 counts partitions by omicron, rank statistic A304465.
A333489 ranks anti-runs, counted by A003242 (complement A261983).
A333627 ranks the run-lengths of standard compositions.
A353840-A353846 pertain to partition run-sum trajectory.
A353847 represents the run-sums of a composition, partitions A353832.
A353853-A353859 pertain to composition run-sum trajectory.
A353932 lists run-sums of standard compositions.
Cf. A237685, A238279, A304442, A325277, A333755, A353848, A353850, A353852.

Table[Length[Select[Join@@Permutations/@ IntegerPartitions[n],Length[FixedPoint[Total/@Split[#]&,#]]==k&]],{n,0,15},{k,0,n}]

cp's OEIS Frontend

A353858 Number of integer compositions of n with run-sum trajectory ending in a singleton.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A325247 Numbers whose omega-sequence is strict (no repeated parts).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A353842 Last part of the trajectory of the partition run-sum transformation of n, using Heinz numbers.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A325264 Numbers whose omega-sequence sums to 7.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A325281 Numbers of the form a*b, a*a*b, or a*a*b*c where a, b, and c are distinct primes. Numbers with sorted prime signature (1,1), (1,2), or (1,1,2).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A353844 Starting with the multiset of prime indices of n, repeatedly take the multiset of run-sums until you reach a squarefree number. This number is prime (or 1) iff n belongs to the sequence.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A353845 Number of integer partitions of n such that if you repeatedly take the multiset of run-sums (or condensation), you eventually reach an empty set or singleton.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A320118 a(1) = a(2) = 1; for n > 2, a(n) = A181819(n) * a(A181819(n)).

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

Formula

A325416 Least k such that the omega-sequence of k sums to n, and 0 if none exists.

Views

Author

Keywords

Comments

A325281 Numbers of the form ab, aab, or aabc where a, b, and c are distinct primes. Numbers with sorted prime signature (1,1), (1,2), or (1,1,2).