A382857 -id:A382857 - cp's OEIS frontend

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

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&]

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.

A383098 Number of integer partitions of n having at least one permutation with all equal run-sums.

Original entry on oeis.org

1, 1, 2, 2, 4, 2, 7, 2, 7, 5, 7, 2, 19, 2, 7, 8, 14, 2, 27, 2, 24, 8, 7, 2, 58, 5, 7, 13, 30, 2, 72, 2, 38, 8, 7, 8, 135, 2, 7, 8, 91, 2, 112, 2, 45, 38, 7, 2, 258, 5, 51, 8, 54, 2, 208, 8, 143, 8, 7, 2, 525, 2, 7, 44, 153, 8, 256, 2, 75, 8, 136, 2, 891, 2, 7, 57, 87, 8

Offset: 0

Gus Wiseman, Apr 17 2025

nonn

			The partition (4,4,4,2,2,1,1,1,1) has permutations (4,2,2,4,1,1,1,1,4) and (4,1,1,1,1,4,2,2,4) so is counted under a(20).
The a(1) = 1 through a(10) = 7 partitions (A=10):
  1  2   3    4     5      6       7        8         9          A
     11  111  22    11111  33      1111111  44        333        55
              211          222              422       33111      22222
              1111         2211             2222      3111111    511111
                           3111             41111     111111111  2221111
                           21111            221111               22111111
                           111111           11111111             1111111111

For distinct instead of equal run-sums we appear to have A382427.
For run-lengths instead of sums we have A383013, ranked by complement of A382879.
The case of a unique choice is A383095, ranks A383099 = positions of 1 in A382877.
The complement is counted by A383096, ranks A383100 = positions of 0 in A382877.
These partitions are ranked by A383110.
The case of more than one choice is A383097, ranks A383015.
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.
Cf. A006171, A329738, A353832, A353839, A353850, A353932, A354584, A382076, A382857, A382876, A383094, A383112.

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

a(n) = A383097(n) + A383095(n), ranks A383015 \/ A383099.

More terms from Bert Dobbelaere, Apr 26 2025

A383110 Numbers whose prime indices have a permutation with all equal run-sums.

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, 36, 37, 40, 41, 43, 47, 48, 49, 53, 59, 61, 63, 64, 67, 71, 73, 79, 81, 83, 89, 97, 101, 103, 107, 109, 112, 113, 121, 125, 127, 128, 131, 137, 139, 144, 149, 151, 157, 163, 167, 169, 173

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 prime indices of 144 are {1,1,1,1,2,2}, with permutations with equal run sums (1,1,1,1,2,2), (1,1,2,1,1,2), (2,1,1,2,1,1), (2,2,1,1,1,1), so 144 is in the sequence.
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}
  25: {3,3}
  27: {2,2,2}
  29: {10}
  31: {11}
  32: {1,1,1,1,1}
  36: {1,1,2,2}
  37: {12}

For distinct run-sums we appear to have complement of A381636 (counted by A381717).
These are the positions of positive terms in A382877.
For run-lengths instead of sums we have complement of A382879, counted by A383013.
For more than one choice we have A383015.
Partitions of this type are counted by A383098.
For a unique choice we have A383099, counted by A383095.
The complement is A383100, counted by A383096.
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. A351295, A353832, A353837, A353838, A354584, A381871, A382857, A382876, A383097.

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

Equals A383015 \/ A383099, counted by A353851 \/ A383095.

A382773 Number of ways to permute a multiset whose multiplicities are the prime indices of n so that the run-lengths are all different.

Original entry on oeis.org

1, 1, 1, 0, 1, 2, 1, 0, 0, 2, 1, 0, 1, 2, 2, 0, 1, 0, 1, 0, 4, 4, 1, 0, 4, 4, 0, 0, 1, 6, 1, 0, 4, 6, 4, 0, 1, 6, 4, 0, 1, 6, 1, 0, 0, 8, 1, 0, 4, 0, 6, 0, 1, 0, 6, 0, 6, 8, 1, 0, 1, 10, 0, 0, 8, 6, 1, 0, 8, 6, 1, 0, 1, 10, 0, 0, 6, 6, 1, 0, 0, 12, 1, 0, 16

Offset: 1

Gus Wiseman, Apr 09 2025

nonn

This described multiset (row n of A305936, Heinz number A181821) is generally not the same as the multiset of prime indices of n (A112798). For example, the prime indices of 12 are {1,1,2}, while a multiset whose multiplicities are {1,1,2} is {1,1,2,3}.

			The a(n) partitions for n = 6, 21, 30, 46:
  (1,1,2)  (1,1,1,1,2,2)  (1,1,1,2,2,3)  (1,1,1,1,1,1,1,1,1,2)
  (2,1,1)  (1,1,1,2,2,1)  (1,1,1,3,2,2)  (1,1,1,1,1,1,1,2,1,1)
           (1,2,2,1,1,1)  (2,2,1,1,1,3)  (1,1,1,1,1,1,2,1,1,1)
           (2,2,1,1,1,1)  (2,2,3,1,1,1)  (1,1,1,1,1,2,1,1,1,1)
                          (3,1,1,1,2,2)  (1,1,1,1,2,1,1,1,1,1)
                          (3,2,2,1,1,1)  (1,1,1,2,1,1,1,1,1,1)
                                         (1,1,2,1,1,1,1,1,1,1)
                                         (2,1,1,1,1,1,1,1,1,1)

Positions of 1 are A008578.
For anti-run permutations we have A335125.
For just prime indices we have A382771, firsts A382772, equal A382857.
These permutations for factorials are counted by A382774, equal A335407.
For equal instead of distinct run-lengths we have A382858.
Positions of 0 are A382912, complement A382913.
A044813 lists numbers whose binary expansion has distinct run-lengths, equal A140690.
A055396 gives least prime index, greatest A061395.
A056239 adds up prime indices, row sums of A112798.
A098859 counts partitions with distinct multiplicities, ordered A242882.
A239455 counts Look-and-Say partitions, ranks A351294, conjugate A381432.
A329738 counts compositions with equal run-lengths, ranks A353744.
A329739 counts compositions with distinct run-lengths, ranks A351596.
A351293 counts non-Look-and-Say partitions, ranks A351295, conjugate A381433.
Cf. A000670, A000720, A003242, A048767, A130091, A181821, A238130, A305936, A351013, A351202, A382876, A382879.

nrmptn[n_]:=Join@@MapIndexed[Table[#2[[1]],{#1}]&,If[n==1,{},Flatten[Cases[FactorInteger[n]//Reverse,{p_,k_}:>Table[PrimePi[p],{k}]]]]];
Table[Length[Select[Permutations[nrmptn[n]],UnsameQ@@Length/@Split[#]&]],{n,100}]

a(n) = A382771(A181821(n)) = A382771(A304660(n)).

A383089 Numbers whose prime indices have more than one permutation with all equal run-lengths.

Original entry on oeis.org

6, 10, 14, 15, 21, 22, 26, 30, 33, 34, 35, 36, 38, 39, 42, 46, 51, 55, 57, 58, 60, 62, 65, 66, 69, 70, 74, 77, 78, 82, 84, 85, 86, 87, 90, 91, 93, 94, 95, 100, 102, 105, 106, 110, 111, 114, 115, 118, 119, 120, 122, 123, 126, 129, 130, 132, 133, 134, 138, 140

Offset: 1

Gus Wiseman, Apr 18 2025

nonn

First differs from A362606 (complement A359178 with 1) in having 180 and lacking 240.
First differs from A130092 (complement A130091) in having 360 and lacking 240.
First differs from A351295 (complement A351294) in having 216 and lacking 240.
Includes all squarefree numbers A005117 except the primes A000040.
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 prime indices of 36 are {1,1,2,2}, and we have 4 permutations each having all equal run-lengths: (1,1,2,2), (1,2,1,2), (2,2,1,1), (2,1,2,1), so 36 is in the sequence.
The terms together with their prime indices begin:
    6: {1,2}
   10: {1,3}
   14: {1,4}
   15: {2,3}
   21: {2,4}
   22: {1,5}
   26: {1,6}
   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}
   46: {1,9}
   51: {2,7}
   55: {3,5}
   57: {2,8}
   58: {1,10}
   60: {1,1,2,3}

Positions of terms > 1 in A382857 (distinct A382771), zeros A382879, ones A383112.
For run-sums instead of lengths we have A383015, counted by A383097.
Partitions of this type are counted by A383090.
The complement is A383091, counted by A383092, just zero A382915, just one A383094.
For distinct instead of equal run-sums we have A383113.
A044813 lists numbers whose binary expansion has distinct run-lengths.
A047966 counts partitions with equal run-lengths, compositions A329738.
A055396 gives least prime index, greatest A061395.
A056239 adds up prime indices, row sums of A112798.
A098859 counts partitions with distinct run-lengths, ranks A130091.
A239455 counts Look-and-Say partitions, ranks A351294, conjugate A381432.
A329739 counts compositions with distinct run-lengths, ranks A351596, complement A351291.
A351293 counts non-Look-and-Say partitions, ranks A351295, conjugate A381433.
Cf. A000720, A000961, A001221, A001222, A048767, A353744, A353833, A381541, A381871, A382877, A383014, A383100.

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

The complement is A383091 = A382879 \/ A383112, counted by A382915 + A383094.

A383094 Number of integer partitions of n having exactly one permutation with all equal run-lengths.

Original entry on oeis.org

1, 1, 2, 2, 4, 4, 5, 6, 9, 7, 11, 10, 13, 12, 17, 14, 21, 16, 21, 18, 27, 22, 29, 22, 34, 25, 35, 28, 41, 28, 43, 30, 48, 38, 47, 38, 55, 36, 53, 46, 64, 40, 67, 42, 69, 54, 65, 46, 84, 51, 75, 62, 83, 52, 86, 62, 94, 70, 83, 58, 111, 60, 89, 80, 106, 74, 115, 66, 111

Offset: 0

Gus Wiseman, Apr 20 2025

nonn

			The partition (222211) has exactly one permutation with all equal run-lengths: (221122), so is counted under a(10).
The a(1) = 1 through a(8) = 9 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (111)  (22)    (221)    (33)      (322)      (44)
                    (211)   (311)    (222)     (331)      (332)
                    (1111)  (11111)  (411)     (511)      (422)
                                     (111111)  (22111)    (611)
                                               (1111111)  (2222)
                                                          (22211)
                                                          (221111)
                                                          (11111111)

The complement is ranked by A382879 \/ A383089.
For no choices we have A382915, ranks A382879.
For at least one choice we have A383013, for run-sums A383098, ranks A383110.
For more than one choice we have A383090, ranks A383089.
For at most one choice we have A383092, ranks A383091.
For run-sums instead of lengths we have A383095, ranks A383099.
Partitions of this type are ranked by A383112 = positions of 1 in A382857.
Cf. A047966, A072774, A098859, A100471, A100881, A100882, A100883, A304442.
A000041 counts integer partitions, strict A000009.
A008284 counts partitions by length, strict A008289.
A239455 counts Look-and-Say partitions, ranks A351294, conjugate A381432.
A329738 counts compositions with equal run-lengths, ranks A353744.
A329739 counts compositions with distinct run-lengths, ranks A351596, complement A351291.
A351293 counts non-Look-and-Say partitions, ranks A351295, conjugate A381433.
Cf. A047993, A362608, A381871, A382076, A382771, A383096, A383097, A383111.

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

More terms from Bert Dobbelaere, Apr 26 2025

A383096 Number of integer partitions of n having no permutation with all equal run-sums.

Original entry on oeis.org

0, 0, 0, 1, 1, 5, 4, 13, 15, 25, 35, 54, 58, 99, 128, 168, 217, 295, 358, 488, 603, 784, 995, 1253, 1517, 1953, 2429, 2997, 3688, 4563, 5532, 6840, 8311, 10135, 12303, 14875, 17842, 21635, 26008, 31177, 37247, 44581, 53062, 63259, 75130, 89096, 105551, 124752, 147015, 173520

Offset: 0

Gus Wiseman, Apr 17 2025

nonn

			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)         (331)     (431)
                             (421)     (521)
                             (511)     (611)
                             (2221)    (3221)
                             (3211)    (3311)
                             (4111)    (4211)
                             (22111)   (5111)
                             (31111)   (22211)
                             (211111)  (32111)
                                       (311111)
                                       (2111111)

For distinct instead of equal run-sums we appear to have A381717, q.v.
For run-lengths instead of sums we have A382915, ranks A382879, by signature A382914.
For more than one permutation we have A383097, ranks A383015.
The complement is counted by A383098, ranks A383110
These partitions are ranked by A383100, positions of 0 in A382877.
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.
A383095 counts partitions having a unique permutation with equal run-sums, ranks A383099.
Cf. A006171, A329738, A353832, A353839, A353932, A354584, A382076, A382857, A383094.

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

More terms from Bert Dobbelaere, Apr 26 2025

A384347 Heinz numbers of integer partitions with exactly two possible ways to choose disjoint strict partitions of each part.

Original entry on oeis.org

5, 7, 21, 22, 25, 26, 33, 35, 39, 49, 102, 114, 130, 147, 154, 165, 170, 175, 190, 195, 231, 238, 242, 255, 275, 285

Offset: 1

Gus Wiseman, May 27 2025

Positions of 2 in A383706.

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 prime indices of 275 are {3,3,5}, with two ways to choose disjoint strict partitions of each part: ((3),(2,1),(5)) and ((2,1),(3),(5)). Hence 275 is in the sequence.
The terms together with their prime indices begin:
    5: {3}
    7: {4}
   21: {2,4}
   22: {1,5}
   25: {3,3}
   26: {1,6}
   33: {2,5}
   35: {3,4}
   39: {2,6}
   49: {4,4}
  102: {1,2,7}
  114: {1,2,8}
  130: {1,3,6}
  147: {2,4,4}
  154: {1,4,5}
  165: {2,3,5}

The case of no choices is A382912, counted by A383710, odd case A383711.
These are positions of 2 in A383706.
The case of no proper choices is A383707, counted by A179009.
The case of some proper choice is A384321, strict A384322, count A384317, strict A384318.
These partitions are counted by A384323, strict A384319.
A055396 gives least prime index, greatest A061395.
A056239 adds up prime indices, row sums of A112798.
A239455 counts Look-and-Say or section-sum partitions, ranks A351294 or A381432.
A351293 counts non-Look-and-Say or non-section-sum partitions, ranks A351295 or A381433.
A357982 counts strict partitions of prime indices, non-strict A299200.
Cf. A048767, A382525, A382771, A382857, A383533, A383708, A384320.

prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
pof[y_]:=Select[Join@@@Tuples[IntegerPartitions/@y],UnsameQ@@#&];
Select[Range[100],Length[pof[prix[#]]]==2&]

A382858 Number of ways to permute a multiset whose multiplicities are the prime indices of n so that the run-lengths are all equal.

Original entry on oeis.org

1, 1, 1, 2, 1, 1, 1, 6, 4, 0, 1, 6, 1, 0, 1, 24, 1, 12, 1, 2, 1, 0, 1, 36, 4, 0, 36, 0, 1, 10, 1, 120, 0, 0, 1, 84, 1, 0, 0, 24, 1, 3, 1, 0, 38, 0, 1, 240, 6, 18, 0, 0, 1, 246, 0, 6, 0, 0, 1, 96, 1, 0, 30, 720, 1, 0, 1, 0, 0, 14, 1, 660, 1, 0, 74, 0, 1, 0, 1

Offset: 1

Gus Wiseman, Apr 09 2025

nonn

This described multiset (row n of A305936, Heinz number A181821) is generally not the same as the multiset of prime indices of n (A112798). For example, the prime indices of 12 are {1,1,2}, while a multiset whose multiplicities are {1,1,2} is {1,1,2,3}.

			The a(9) = 4 permutations are:
  (1,1,2,2)
  (1,2,1,2)
  (2,1,2,1)
  (2,2,1,1)

The anti-run case is A335125.
These permutations for factorials are counted by A335407, distinct A382774.
For distinct instead of equal run-lengths we have A382773.
For prime indices we have A382857 (firsts A382878), distinct A382771 (firsts A382772).
Positions of 0 are A382914, signature restriction of A382915.
A003963 gives product of prime indices.
A140690 lists numbers whose binary expansion has equal run-lengths, distinct A044813.
A047966 counts partitions with equal multiplicities, distinct A098859.
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.
A329739 counts compositions with distinct run-lengths, ranks A351596, complement A351291.
A382913 ranks Look-and-Say partitions by signature, complement A382912.
Cf. A000720, A000961, A001221, A001222, A003242, A048767, A181821, A182854, A238130, A305936, A351202, A382879.

nrmptn[n_]:=Join@@MapIndexed[Table[#2[[1]],{#1}]&,If[n==1,{},Flatten[Cases[FactorInteger[n]//Reverse,{p_,k_}:>Table[PrimePi[p],{k}]]]]];
Table[Length[Select[Permutations[nrmptn[n]],SameQ@@Length/@Split[#]&]],{n,100}]

a(n) = A382857(A181821(n)) = A382857(A304660(n)).

cp's OEIS Frontend

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

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

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

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A383098 Number of integer partitions of n having at least one permutation with all equal run-sums.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Formula

Extensions

A383110 Numbers whose prime indices have a permutation with all equal run-sums.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A382773 Number of ways to permute a multiset whose multiplicities are the prime indices of n so that the run-lengths are all different.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A383089 Numbers whose prime indices have more than one permutation with all equal run-lengths.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A383094 Number of integer partitions of n having exactly one permutation with all equal run-lengths.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Extensions

A383096 Number of integer partitions of n having no permutation with all equal run-sums.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Extensions

A384347 Heinz numbers of integer partitions with exactly two possible ways to choose disjoint strict partitions of each part.

Views