A304442 -id:A304442 - cp's OEIS frontend

A353836 Triangle read by rows where T(n,k) is the number of integer partitions of n with k distinct run-sums.

1, 0, 1, 0, 2, 0, 0, 2, 1, 0, 0, 4, 1, 0, 0, 0, 2, 5, 0, 0, 0, 0, 5, 5, 1, 0, 0, 0, 0, 2, 12, 1, 0, 0, 0, 0, 0, 7, 12, 3, 0, 0, 0, 0, 0, 0, 3, 19, 8, 0, 0, 0, 0, 0, 0, 0, 5, 27, 9, 1, 0, 0, 0, 0, 0, 0, 0, 2, 33, 20, 1, 0, 0, 0, 0, 0, 0, 0

Offset: 0

Gus Wiseman, May 26 2022

The run-sums of a sequence are the sums of its maximal consecutive constant subsequences (runs). For example, the run-sums of (2,2,1,1,1,3,2,2) are (4,3,3,4).

			Triangle begins:
  1
  0  1
  0  2  0
  0  2  1  0
  0  4  1  0  0
  0  2  5  0  0  0
  0  5  5  1  0  0  0
  0  2 12  1  0  0  0  0
  0  7 12  3  0  0  0  0  0
  0  3 19  8  0  0  0  0  0  0
  0  5 27  9  1  0  0  0  0  0  0
  0  2 33 20  1  0  0  0  0  0  0  0
  0 13 28 34  2  0  0  0  0  0  0  0  0
  0  2 48 46  5  0  0  0  0  0  0  0  0  0
  0  5 65 51 14  0  0  0  0  0  0  0  0  0  0
  0  4 57 99 15  1  0  0  0  0  0  0  0  0  0  0
For example, row n = 8 counts the following partitions:
  (8)         (53)       (431)
  (44)        (62)       (521)
  (422)       (71)       (3221)
  (2222)      (332)
  (41111)     (611)
  (221111)    (3311)
  (11111111)  (4211)
              (5111)
              (22211)
              (32111)
              (311111)
              (2111111)

Row sums are A000041.
Counting distinct parts instead of run-sums gives A116608.
Column k = 1 is A304442, ranked by A353833 (nonprime A353834).
The rank statistic is A353835, weak A353861, for compositions A353849.
A275870 counts collapsible partitions, ranked by A300273.
A351014 counts distinct runs in standard compositions.
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.
A353864 counts rucksack partitions, ranked by A353866.
A353865 counts perfect rucksack partitions, ranked by A353867.
Cf. A008284, A047966, A071625, A165413, A175413, A325280, A333755.

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

A357864 Numbers whose prime indices have strictly decreasing run-sums. Heinz numbers of the partitions counted by A304430.

Original entry on oeis.org

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

Offset: 1

Gus Wiseman, Oct 19 2022

nonn

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

			The terms together with their prime indices begin:
    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}
   24: {1,1,1,2}
   25: {3,3}
   27: {2,2,2}
   29: {10}
For example, the prime indices of 24 are {1,1,1,2}, with run-sums (3,2), which are strictly decreasing, so 24 is in the sequence.

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

Subsequence of A304686.
These partitions are counted by A304430.
These are the indices  of rows in A354584 that are strictly decreasing.
The weakly decreasing version is A357861, counted by A304406.
The opposite version is A357862, counted by A304428, complement A357863.
A001222 counts prime factors, distinct A001221.
A056239 adds up prime indices, row sums of A112798.
Cf. A118914, A181819, A300273, A304405, A304442, A357875.

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

A382076 Number of integer partitions of n whose run-sums are not all equal.

Original entry on oeis.org

0, 0, 0, 1, 1, 5, 6, 13, 15, 27, 37, 54, 64, 99, 130, 172, 220, 295, 372, 488, 615, 788, 997, 1253, 1547, 1955, 2431, 3005, 3706, 4563, 5586, 6840, 8332, 10139, 12305, 14879, 17933, 21635, 26010, 31181, 37314, 44581, 53156, 63259, 75163, 89124, 105553, 124752, 147210

Offset: 0

Gus Wiseman, Apr 02 2025

nonn

Also the number of integer partitions of n that cannot be partitioned into distinct constant multisets with a common sum. Multiset partitions of this type are ranked by A005117 /\ A326534 /\ A355743, while twice-partitions are counted by A382524, strict case of A279789.

			The partition (3,2,1,1,1) has runs ((3),(2),(1,1,1)) with sums (3,2,3) so is counted under a(8).
The a(3) = 1 through a(8) = 15 partitions:
  (21)  (31)  (32)    (42)     (43)      (53)
              (41)    (51)     (52)      (62)
              (221)   (321)    (61)      (71)
              (311)   (411)    (322)     (332)
              (2111)  (2211)   (331)     (431)
                      (21111)  (421)     (521)
                               (511)     (611)
                               (2221)    (3221)
                               (3211)    (3311)
                               (4111)    (4211)
                               (22111)   (5111)
                               (31111)   (22211)
                               (211111)  (32111)
                                         (311111)
                                         (2111111)

The complement is counted by A304442, ranks A353833.
For distinct instead of equal block-sums we have A381717.
This is the strict case of A381993, see A381995, zeros A381871.
A050361 counts factorizations into distinct prime powers, see A381715.
A304405 counts partitions with weakly decreasing run-sums, ranks A357875.
A304406 counts partitions with weakly increasing run-sums, ranks A357861.
A304428 counts partitions with strictly decreasing run-sums, ranks A357862.
A304430 counts partitions with strictly increasing run-sums, ranks A357864.
A317141 counts coarsenings of prime indices, refinements A300383.
A326534 ranks multiset partitions with a common sum.
A353837 counts partitions with distinct run-sums.
A354584 lists run-sums of weakly increasing prime indices.
A355743 ranks multiset partitions into constant blocks.
Cf. A000688, A005117, A006171, A047966, A279784, A381453, A381455, A381635, A381636, A381994, A382204.

Table[Length[Select[IntegerPartitions[n],!SameQ@@Total/@Split[#]&]],{n,0,15}]

More terms from Bert Dobbelaere, Apr 26 2025

A353841 Length of the trajectory of the partition run-sum transformation of n, using Heinz numbers; a(1) = 0.

Original entry on oeis.org

0, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 3, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2, 2, 1, 2, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 3, 1, 1, 1, 2, 2, 1, 1, 2, 2, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 3, 1, 1, 3, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 2, 1, 1, 1, 2, 2, 1, 1, 4, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2, 1, 2, 2, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 3

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.
Starting with n, this is one plus the number of times one must apply A353832 to reach a squarefree number.
Also Kimberling's depth statistic (defined in A237685 and A237750) plus one.

			The trajectory for a(1080) = 4 is the following, with prime indices shown on the right:
  1080: {1,1,1,2,2,2,3}
   325: {3,3,6}
   169: {6,6}
    37: {12}
The trajectory for a(87780) = 5 is the following, with prime indices shown on the right:
  87780: {1,1,2,3,4,5,8}
  65835: {2,2,3,4,5,8}
  51205: {3,4,4,5,8}
  19855: {3,5,8,8}
   2915: {3,5,16}
The trajectory for a(39960) = 5 is the following, with prime indices shown on the right:
  39960: {1,1,1,2,2,2,3,12}
  12025: {3,3,6,12}
   6253: {6,6,12}
   1369: {12,12}
     89: {24}

Antti Karttunen, Table of n, a(n) for n = 1..65537
Index entries for sequences related to prime indices in the factorization of n.

Positions of 1's are A005117.
The version for run-lengths instead of sums is A182850 or A323014.
Positions of first appearances are A353743.
These are the row-lengths of A353840.
Other sequences pertaining to this trajectory are A353842-A353845.
Counting partitions by this statistic gives A353846.
The version for compositions is A353854, run-lengths of A353853.
A001222 counts prime factors, distinct A001221.
A005811 counts runs in binary expansion.
A056239 adds up prime indices, row sums of A112798 and A296150.
A300273 ranks collapsible partitions, counted by A275870.
A318928 gives runs-resistance of binary expansion.
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.
A353838 ranks partitions with all distinct run-sums, counted by A353837.
A353866 ranks rucksack partitions, counted by A353864.
Cf. A008966, A071625, A073093, A181819, A182857, A325239, A325277, A325278, A353834, A353847, A353865, A353867.

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

pis_to_runs(n) = { my(runs=List([]), f=factor(n)); for(i=1,#f~,while(f[i,2], listput(runs,primepi(f[i,1])); f[i,2]--)); (runs); };
A353832(n) = if(1==n,n,my(pruns = pis_to_runs(n), m=1, runsum=pruns[1]); for(i=2,#pruns,if(pruns[i] == pruns[i-1], runsum += pruns[i], m *= prime(runsum); runsum = pruns[i])); (m*prime(runsum)));
A353841(n) = if(1==n,0,for(i=1,oo,if(issquarefree(n), return(i), n = A353832(n)))); \\ Antti Karttunen, Jan 20 2025

a(1) = 0, and for n > 1, if A008966(n) = 1 [n is in A005117], a(n) = 1, otherwise a(n) = 1+a(A353832(n)). [See comments] - Antti Karttunen, Jan 20 2025

More terms from Antti Karttunen, Jan 20 2025

A353931 Least run-sum of the prime indices of n.

Original entry on oeis.org

0, 1, 2, 2, 3, 1, 4, 3, 4, 1, 5, 2, 6, 1, 2, 4, 7, 1, 8, 2, 2, 1, 9, 2, 6, 1, 6, 2, 10, 1, 11, 5, 2, 1, 3, 2, 12, 1, 2, 3, 13, 1, 14, 2, 3, 1, 15, 2, 8, 1, 2, 2, 16, 1, 3, 3, 2, 1, 17, 2, 18, 1, 4, 6, 3, 1, 19, 2, 2, 1, 20, 3, 21, 1, 2, 2, 4, 1, 22, 3, 8, 1

Offset: 1

Gus Wiseman, Jun 07 2022

nonn

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.

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 prime indices of 72 are {1,1,1,2,2}, with run-sums {3,4}, so a(72) = 3.

Positions of first appearances are A008578.
For run-lengths instead of run-sums we have A051904, greatest A051903.
For run-sums and binary expansion we have A144790, greatest A038374.
For run-lengths and binary expansion we have A175597, greatest A043276.
Distinct run-sums are counted by A353835, weak A353861.
The greatest run-sum is given by A353862.
A001222 counts prime factors, distinct A001221.
A005811 counts runs in binary expansion.
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, compositions A353851.
A353832 represents the operation of taking run-sums of a partition.
A353833 ranks partitions with all equal run sums, nonprime A353834.
A353838 ranks partitions with all distinct run-sums, counted by A353837.
A353840-A353846 pertain to partition run-sum trajectory.
Cf. A067340, A073093, A181819, A300273, A316413, A353839, A353866.

Table[Min@@Cases[FactorInteger[n],{p_,k_}:>PrimePi[p]*k],{n,100}]

A382915 Number of integer partitions of n having no permutation with all equal run-lengths.

Original entry on oeis.org

0, 0, 0, 0, 0, 1, 2, 4, 4, 9, 11, 18, 21, 34, 41, 55, 69, 98, 120, 160, 189, 249, 309, 396, 472, 605, 734, 913, 1099, 1371, 1632, 2021, 2406, 2937, 3514, 4251, 5039, 6101, 7221, 8646, 10205, 12209, 14347, 17086, 20041, 23713, 27807, 32803, 38262, 45043, 52477, 61471, 71496

Offset: 0

Gus Wiseman, Apr 12 2025

nonn

			The partition y = (2,2,1,1,1) has permutations and run-lengths:
  (2,2,1,1,1) (2,3)
  (2,1,2,1,1) (1,1,1,2)
  (2,1,1,2,1) (1,2,1,1)
  (2,1,1,1,2) (1,3,1)
  (1,2,2,1,1) (1,2,2)
  (1,2,1,2,1) (1,1,1,1,1)
  (1,2,1,1,2) (1,1,2,1)
  (1,1,2,2,1) (2,2,1)
  (1,1,2,1,2) (2,1,1,1)
  (1,1,1,2,2) (3,2)
Since (1,2,1,2,1) has all equal run-lengths (1,1,1,1,1), y is not counted under a(7).
The a(5) = 1 through a(10) = 11 partitions:
  (2111)  (3111)   (2221)    (5111)     (3222)      (3331)
          (21111)  (4111)    (41111)    (6111)      (4222)
                   (31111)   (311111)   (22221)     (7111)
                   (211111)  (2111111)  (51111)     (61111)
                                        (321111)    (421111)
                                        (411111)    (511111)
                                        (2211111)   (3211111)
                                        (3111111)   (4111111)
                                        (21111111)  (22111111)
                                                    (31111111)
                                                    (211111111)

The complement for distinct run-lengths is A239455, ranked by A351294.
For distinct instead of equal run-lengths we have A351293, ranked by A351295.
These partitions are ranked by A382879, by signature A382914.
The complement is counted by A383013.
A000041 counts integer partitions, strict A000009.
A056239 adds up prime indices, row sums of A112798.
A304442 counts partitions with equal run-sums, ranks A353833.
A329738 counts compositions with equal run-lengths, ranks A353744.
A382857 counts permutations of prime indices with equal run-lengths.
Cf. A003242, A047966, A238279, A329739, A351201, A351290, A351596, A382773.

Table[Length[Select[IntegerPartitions[n],Select[Permutations[#],SameQ@@Length/@Split[#]&]=={}&]],{n,0,15}]

More terms from Bert Dobbelaere, Apr 26 2025

A357861 Numbers whose prime indices have weakly decreasing run-sums. Heinz numbers of the partitions counted by A304406.

Original entry on oeis.org

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

Offset: 1

Gus Wiseman, Oct 19 2022

nonn

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

			The terms together with their prime indices begin:
    1: {}
    2: {1}
    3: {2}
    4: {1,1}
    5: {3}
    7: {4}
    8: {1,1,1}
    9: {2,2}
   11: {5}
   12: {1,1,2}
   13: {6}
   16: {1,1,1,1}
   17: {7}
   19: {8}
   23: {9}
   24: {1,1,1,2}
   25: {3,3}
   27: {2,2,2}
For example, the prime indices of 24 are {1,1,1,2}, with run-sums (3,2), which are weakly decreasing, so 24 is in the sequence.

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

These partitions are counted by A304406.
These are the indices  of rows in A354584 that are weakly decreasing.
The complement is A357850, counted by A357865, opposite A357876.
The strictly decreasing version is A357864, counted by A304430.
The opposite (weakly increasing) version is A357875, counted by A304405.
A001222 counts prime factors, distinct A001221.
A056239 adds up prime indices, row sums of A112798.
Cf. A047966, A118914, A181819, A239312, A300273, A304442.

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

A383015 Numbers whose prime indices have more than one permutation with all equal run-sums.

Original entry on oeis.org

12, 40, 63, 112, 144, 325, 351, 352, 675, 832, 931, 1008, 1539, 1600, 1728, 2176, 2875, 3509, 3969, 4864, 6253, 7047, 7056, 8775, 9072, 11776, 12427, 12544, 12691, 16128, 19133, 20736, 20800, 22464, 23125, 26973, 29403, 29696, 32269, 43200, 49392, 57967, 59711

Offset: 1

Gus Wiseman, Apr 14 2025

nonn

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, sum A056239.

All terms appear to have even sum of prime indices.

			The terms together with their prime indices begin:
     12: {1,1,2}
     40: {1,1,1,3}
     63: {2,2,4}
    112: {1,1,1,1,4}
    144: {1,1,1,1,2,2}
    325: {3,3,6}
    351: {2,2,2,6}
    352: {1,1,1,1,1,5}
    675: {2,2,2,3,3}
    832: {1,1,1,1,1,1,6}
    931: {4,4,8}
   1008: {1,1,1,1,2,2,4}
   1539: {2,2,2,2,8}
   1600: {1,1,1,1,1,1,3,3}
   1728: {1,1,1,1,1,1,2,2,2}

Compositions of this type are counted by A353851, ranked by A353848.
Positions of terms > 1 in A382877, zeros A383100 (complement A383014).
For run-lengths instead of sums we have A383089, counted by A383090.
The complement for run-lengths instead of sums is A383091, counted by A383092
Partitions of this type are counted by A383097.
A044813 lists numbers whose binary expansion has distinct run-lengths.
A056239 adds up prime indices, row sums of A112798.
A304442 counts compositions with equal run-sums, complement A382076.
A329739 counts compositions with distinct run-lengths, ranks A351596.
A353837 counts partitions with distinct run-sums, ranks A353838.
A353847 gives composition run-sum transformation, for partitions A353832.
A353932 lists run-sums of standard compositions.
Cf. A000720, A000961, A001221, A001222, A329738, A353833, A354584, A381636, A381871, A382857, A382876, A382879.

Select[Range[100],Length[Select[Permutations[PrimePi/@Join@@ConstantArray@@@FactorInteger[#]],SameQ@@Total/@Split[#]&]]>1&]

A383097 Number of integer partitions of n having more than one permutation with all equal run-sums.

Original entry on oeis.org

0, 0, 0, 0, 1, 0, 1, 0, 3, 0, 1, 0, 7, 0, 1, 0, 9, 0, 7, 0, 12, 0, 1, 0, 38, 0, 1, 1, 18, 0, 38, 0, 32, 0, 1, 0, 90, 0, 1, 0, 71, 0, 78, 0, 33, 10, 1, 0, 228, 0, 31, 0, 42, 0, 156, 0, 123, 0, 1, 0, 447, 0, 1, 16, 146, 0, 222, 0, 63, 0, 102, 0, 811, 0, 1, 29, 75, 0, 334, 0

Offset: 0

Gus Wiseman, Apr 17 2025

nonn

			The a(27) = 1 partition is: (9,3,3,3,1,1,1,1,1,1,1,1,1).
The a(4) = 1 through a(16) = 9 partitions (empty columns not shown):
  (211)  (3111)  (422)     (511111)  (633)        (71111111)  (844)
                 (41111)             (6222)                   (82222)
                 (221111)            (33222)                  (442222)
                                     (4221111)                (44221111)
                                     (6111111)                (422221111)
                                     (33111111)               (811111111)
                                     (222111111)              (4411111111)
                                                              (42211111111)
                                                              (222211111111)

These partitions are ranked by A383015, positions of terms > 1 in A382877.
For run-lengths instead of sums we have A383090, ranks A383089, unique A383094.
The complement is A383095 + A383096, ranks A383099 \/ A383100.
For any positive number of permutations we have A383098, ranks A383110.
Counting and ranking partitions by run-lengths and run-sums:
- constant: A047966 (ranks A072774), sums A304442 (ranks A353833)
- distinct: A098859 (ranks A130091), sums A353837 (ranks A353838)
- weakly decreasing: A100882 (ranks A242031), sums A304405 (ranks A357875)
- weakly increasing: A100883 (ranks A304678), sums A304406 (ranks A357861)
- strictly decreasing: A100881 (ranks A304686), sums A304428 (ranks A357862)
- strictly increasing: A100471 (ranks A334965), sums A304430 (ranks A357864)
A275870 counts collapsible partitions, ranks A300273.
A326534 ranks multiset partitions with a common sum, counted by A321455, normal A326518.
A353851 counts compositions with all equal run-sums, ranks A353848.
A382876 counts permutations of prime indices with distinct run-sums, zeros A381636.
Cf. A006171, A329738, A353832, A353839, A353850, A353932, A354584, A381717, A382076.

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

More terms from Bert Dobbelaere, Apr 26 2025

A383099 Numbers whose prime indices have exactly one permutation with all equal run-sums.

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, 48, 49, 53, 59, 61, 64, 67, 71, 73, 79, 81, 83, 89, 97, 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 20 2025

nonn

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, sum A056239.

			The terms together with their prime indices begin:
    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}
   37: {12}
   41: {13}

For distinct instead of equal run-sums we have A000961, counted by A000005.
These are the positions of 1 in A382877.
For more than one choice we have A383015.
Partitions of this type are counted by A383095.
For no choices we have A383100, counted by A383096.
For at least one choice we have A383110, counted by A383098, see A383013.
For run-lengths instead of sums we have A383112 = positions of 1 in A382857.
A056239 adds up prime indices, row sums of A112798.
A304442 counts partitions with equal run-sums, ranks A353833.
A353851 counts compositions with equal run-sums, ranks A353848.
Cf. A047966, A072774, A130091, A242031, A304686, A304678, A334965.
Cf. A000720, A001221, A001222, A351294, A353832, A353838, A353932, A354584, A382876, A383091.

Select[Range[100], Length[Select[Permutations[PrimePi/@Join @@ ConstantArray@@@FactorInteger[#]], SameQ@@Total/@Split[#]&]]==1&]

The complement is A383015 \/ A383100, for run-lengths A382879 \/ A383089.

cp's OEIS Frontend

A353836 Triangle read by rows where T(n,k) is the number of integer partitions of n with k distinct run-sums.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A357864 Numbers whose prime indices have strictly decreasing run-sums. Heinz numbers of the partitions counted by A304430.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A382076 Number of integer partitions of n whose run-sums are not all equal.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Extensions

A353841 Length of the trajectory of the partition run-sum transformation of n, using Heinz numbers; a(1) = 0.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A353931 Least run-sum of the prime indices of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A382915 Number of integer partitions of n having no permutation with all equal run-lengths.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Extensions

A357861 Numbers whose prime indices have weakly decreasing run-sums. Heinz numbers of the partitions counted by A304406.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A383015 Numbers whose prime indices have more than one permutation with all equal run-sums.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica