A382858 -id:A382858 - cp's OEIS frontend

A382857 Number of ways to permute the prime indices of n so that the run-lengths are all equal.

1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 2, 2, 1, 0, 1, 2, 1, 1, 1, 6, 1, 1, 2, 2, 2, 4, 1, 2, 2, 0, 1, 6, 1, 1, 1, 2, 1, 0, 1, 1, 2, 1, 1, 0, 2, 0, 2, 2, 1, 6, 1, 2, 1, 1, 2, 6, 1, 1, 2, 6, 1, 1, 1, 2, 1, 1, 2, 6, 1, 0, 1, 2, 1, 6, 2, 2

Offset: 0

Gus Wiseman, Apr 09 2025

nonn

The first x with a(x) > 1 but A382771(x) > 0 is a(216) = 4, A382771(216) = 4.

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 216 are {1,1,1,2,2,2} and we have permutations:
  (1,1,1,2,2,2)
  (1,2,1,2,1,2)
  (2,1,2,1,2,1)
  (2,2,2,1,1,1)
so a(216) = 4.
The prime indices of 25920 are {1,1,1,1,1,1,2,2,2,2,3} and we have permutations:
  (1,2,1,2,1,2,1,2,1,3,1)
  (1,2,1,2,1,2,1,3,1,2,1)
  (1,2,1,2,1,3,1,2,1,2,1)
  (1,2,1,3,1,2,1,2,1,2,1)
  (1,3,1,2,1,2,1,2,1,2,1)
so a(25920) = 5.

The restriction to signature representatives (A181821) is A382858, distinct A382773.
The restriction to factorials is A335407, distinct A382774.
For distinct instead of equal run-lengths we have A382771.
For run-sums instead of run-lengths we have A382877, distinct A382876.
Positions of first appearances are A382878.
Positions of 0 are A382879.
Positions of terms > 1 are A383089.
Positions of 1 are A383112.
A003963 gives product of prime indices.
A005811 counts runs in binary expansion.
A044813 lists numbers whose binary expansion has distinct run-lengths.
A056239 adds up prime indices, row sums of A112798.
A239455 counts Look-and-Say partitions, ranks A351294.
A304442 counts partitions with equal run-sums, ranks A353833.
A164707 lists numbers whose binary expansion has all equal run-lengths, distinct A328592.
A353744 ranks compositions with equal run-lengths, counted by A329738.
Cf. A000720, A000961, A001221, A001222, A003242, A008480, A047966, A238130, A238279, A351201, A351293, A351295.

Table[Length[Select[Permutations[Join@@ConstantArray@@@FactorInteger[n]], SameQ@@Length/@Split[#]&]],{n,0,100}]

A382879 Positions of 0 in A382857 (permutations of prime indices with equal run-lengths).

Original entry on oeis.org

24, 40, 48, 54, 56, 80, 88, 96, 104, 112, 135, 136, 152, 160, 162, 176, 184, 189, 192, 208, 224, 232, 240, 248, 250, 272, 288, 296, 297, 304, 320, 328, 336, 344, 351, 352, 368, 375, 376, 384, 405, 416, 424, 448, 459, 464, 472, 480, 486, 488, 496, 513, 528, 536

Offset: 1

Gus Wiseman, Apr 09 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:
   24: {1,1,1,2}
   40: {1,1,1,3}
   48: {1,1,1,1,2}
   54: {1,2,2,2}
   56: {1,1,1,4}
   80: {1,1,1,1,3}
   88: {1,1,1,5}
   96: {1,1,1,1,1,2}
  104: {1,1,1,6}
  112: {1,1,1,1,4}
  135: {2,2,2,3}
  136: {1,1,1,7}
  152: {1,1,1,8}
  160: {1,1,1,1,1,3}

For distinct instead of equal the complement is A351294, counted by A239455.
For distinct instead of equal we have A351295, counted by A351293.
For run-sums instead of run-lengths we have A383100, zeros of A382877, distinct A382876.
Positions of 0 in A382857 (firsts A382878), by signature A382858 (distinct A382773).
For prime signature instead of prime indices we have A382914.
Partitions of this type are counted by A382915.
The complement is counted by A383013.
A005811 counts runs in binary expansion.
A056239 adds up prime indices, row sums of A112798.
A297770 counts distinct runs in binary expansion.
A164707 lists numbers whose binary form has equal runs of ones, distinct A328592.
A304442 counts partitions with equal run-sums, ranks A353833.
A329739 counts compositions with distinct run-lengths, ranks A351290.
A353744 ranks compositions with equal run-lengths, distinct A351596 (complement A351291).
Cf. A000720, A000961, A001221, A001222, A003242, A008480, A047966, A130091, A238279, A351201.

Select[Range[100], Select[Permutations[Join@@ConstantArray@@@FactorInteger[#]], SameQ@@Length/@Split[#]&]=={}&]

A382912 Numbers k such that row k of A305936 (a multiset whose multiplicities are the prime indices of k) has no permutation with all distinct run-lengths.

Original entry on oeis.org

4, 8, 9, 12, 16, 18, 20, 24, 27, 28, 32, 36, 40, 44, 45, 48, 50, 52, 54, 56, 60, 63, 64, 68, 72, 75, 76, 80, 81, 84, 88, 90, 92, 96, 98, 99, 100, 104, 108, 112, 116, 117, 120, 124, 125, 126, 128, 132, 135, 136, 140, 144, 148, 150, 152, 153, 156, 160, 162, 164

Offset: 1

Gus Wiseman, Apr 12 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}.

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, prime indices, and corresponding multisets begin:
   4:       {1,1} {1,2}
   8:     {1,1,1} {1,2,3}
   9:       {2,2} {1,1,2,2}
  12:     {1,1,2} {1,1,2,3}
  16:   {1,1,1,1} {1,2,3,4}
  18:     {1,2,2} {1,1,2,2,3}
  20:     {1,1,3} {1,1,1,2,3}
  24:   {1,1,1,2} {1,1,2,3,4}
  27:     {2,2,2} {1,1,2,2,3,3}
  28:     {1,1,4} {1,1,1,1,2,3}
  32: {1,1,1,1,1} {1,2,3,4,5}
  36:   {1,1,2,2} {1,1,2,2,3,4}
  40:   {1,1,1,3} {1,1,1,2,3,4}
  44:     {1,1,5} {1,1,1,1,1,2,3}
  45:     {2,2,3} {1,1,1,2,2,3,3}
  48: {1,1,1,1,2} {1,1,2,3,4,5}
  50:     {1,3,3} {1,1,1,2,2,2,3}
  52:     {1,1,6} {1,1,1,1,1,1,2,3}

The Look-and-Say partition is ranked by A048767, listed by A381440.
Look-and-Say partitions are counted by A239455, ranks A351294.
Non-Look-and-Say partitions are counted by A351293.
For prime indices instead of signature we have A351295, conjugate A381433.
The complement is A382913.
For equal instead of distinct run-lengths we have A382914, see A382858, A382879, A382915.
A056239 adds up prime indices, row sums of A112798.
A329739 counts compositions with distinct run-lengths, ranks A351596, complement A351291.
A381431 lists the section-sum partition of n, ranks A381436, union A381432.
Cf. A000720, A001221, A001222, A181821, A305936, A335125, A351202, A382525, A382771, A382773, A382775, A382857.
Cf. A381636, A381717, A381871, A382876.

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

A382913 Numbers k such that row k of A305936 (a multiset whose multiplicities are the prime indices of k) has a permutation with all distinct run-lengths.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 19, 21, 22, 23, 25, 26, 29, 30, 31, 33, 34, 35, 37, 38, 39, 41, 42, 43, 46, 47, 49, 51, 53, 55, 57, 58, 59, 61, 62, 65, 66, 67, 69, 70, 71, 73, 74, 77, 78, 79, 82, 83, 85, 86, 87, 89, 91, 93, 94, 95, 97, 101, 102, 103

Offset: 1

Gus Wiseman, Apr 12 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}.

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, prime indices, and corresponding multisets begin:
   1:    {} {}
   2:   {1} {1}
   3:   {2} {1,1}
   5:   {3} {1,1,1}
   6: {1,2} {1,1,2}
   7:   {4} {1,1,1,1}
  10: {1,3} {1,1,1,2}
  11:   {5} {1,1,1,1,1}
  13:   {6} {1,1,1,1,1,1}
  14: {1,4} {1,1,1,1,2}
  15: {2,3} {1,1,1,2,2}
  17:   {7} {1,1,1,1,1,1,1}
  19:   {8} {1,1,1,1,1,1,1,1}
  21: {2,4} {1,1,1,1,2,2}
  22: {1,5} {1,1,1,1,1,2}
  23:   {9} {1,1,1,1,1,1,1,1,1}
  25: {3,3} {1,1,1,2,2,2}
  26: {1,6} {1,1,1,1,1,1,2}

Look-and-Say partitions are counted by A239455, ranks A351294.
Non-Look-and-Say partitions are counted by A351293, ranks A351295.
For prime indices instead of signature we have A351294, conjugate A381432.
The Look-and-Say partition of n is listed by A381440, rank A048767.
The complement is A382912.
For equal run-lengths we have the complement of A382914, see A382858, A382879, A382915.
A044813 lists numbers whose binary expansion has distinct run-lengths.
A055396 gives least prime index, greatest A061395.
A056239 adds up prime indices, row sums of A112798.
A329739 counts compositions with distinct run-lengths, ranks A351596.
A381431 ranks section-sum partition, listed by A381436.
Cf. A000720, A001221, A001222, A140690, A181821, A305936, A335125, A382525, A382771, A382773, A382775.
Cf. A381636, A381717, A381871, A382876.

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

A382771 Number of ways to permute the prime indices of n so that the run-lengths are all different.

Original entry on oeis.org

1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 2, 1, 0, 0, 1, 1, 2, 1, 2, 0, 0, 1, 2, 1, 0, 1, 2, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 2, 1, 0, 1, 2, 2, 0, 1, 2, 1, 2, 0, 2, 1, 2, 0, 2, 0, 0, 1, 0, 1, 0, 2, 1, 0, 0, 1, 2, 0, 0, 1, 2, 1, 0, 2, 2, 0, 0, 1, 2, 1, 0, 1, 0, 0, 0, 0

Offset: 1

Gus Wiseman, Apr 07 2025

nonn

The first x with a(x) > 0 but A382857(x) > 1 is a(216) = 4, A382857(216) = 4.

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 a(96) = 4 permutations are:
  (1,1,1,1,1,2)
  (1,1,1,2,1,1)
  (1,1,2,1,1,1)
  (2,1,1,1,1,1)
The a(216) = 4 permutations are:
  (1,1,2,2,2,1)
  (1,2,2,2,1,1)
  (2,1,1,1,2,2)
  (2,2,1,1,1,2)
The a(360) = 6 permutations are:
  (1,1,1,2,2,3)
  (1,1,1,3,2,2)
  (2,2,1,1,1,3)
  (2,2,3,1,1,1)
  (3,1,1,1,2,2)
  (3,2,2,1,1,1)

Positions of 1 are A000961.
Positions of positive terms are A351294, conjugate A381432.
Positions of 0 are A351295, conjugate A381433, equal A382879.
Sorted positions of first appearances are A382772, equal A382878.
For prescribed signature we have A382773, equal A382858.
The restriction to factorials is A382774, equal A335407.
For equal instead of distinct run-lengths we have A382857.
For run-sums instead of run-lengths we have A382876, equal A382877.
Positions of terms > 1 are A383113.
A044813 lists numbers whose binary expansion has distinct run-lengths.
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, complement A351293.
A329738 counts compositions with equal run-lengths, ranks A353744.
A329739 counts compositions with distinct run-lengths, ranks A351596.
Cf. A000720, A001221, A001222, A003242, A048767, A051903, A051904, A130091, A238130, A351013, A351202.

Table[Length[Select[Permutations[Join@@ConstantArray@@@FactorInteger[n]],UnsameQ@@Length/@Split[#]&]],{n,30}]

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

a(n!) = A382774(n).

A383013 Number of integer partitions of n having a permutation with all equal run-lengths.

Original entry on oeis.org

1, 1, 2, 3, 5, 6, 9, 11, 18, 21, 31, 38, 56, 67, 94, 121, 162, 199, 265, 330, 438, 543, 693, 859, 1103, 1353, 1702, 2097, 2619, 3194, 3972, 4821, 5943, 7206, 8796, 10632, 12938, 15536, 18794, 22539, 27133, 32374, 38827, 46175, 55134, 65421, 77751, 91951, 109011, 128482

Offset: 0

Gus Wiseman, Apr 12 2025

nonn

A partition of n counts towards a(n) if and only if #p + g >= 2*L where #p is the number of parts counted with multiplicity of the partition, g is the gcd of all the frequencies of every distinct part and L is the largest frequency of a part. - David A. Corneth, Apr 27 2025

			The partition (2,2,1,1,1,1) has permutation (1,1,2,2,1,1) with equal run-lengths (2,2,2) so is counted under a(8).
The a(1) = 1 through a(8) = 18 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (21)   (22)    (32)     (33)      (43)       (44)
             (111)  (31)    (41)     (42)      (52)       (53)
                    (211)   (221)    (51)      (61)       (62)
                    (1111)  (311)    (222)     (322)      (71)
                            (11111)  (321)     (331)      (332)
                                     (411)     (421)      (422)
                                     (2211)    (511)      (431)
                                     (111111)  (3211)     (521)
                                               (22111)    (611)
                                               (1111111)  (2222)
                                                          (3221)
                                                          (3311)
                                                          (4211)
                                                          (22211)
                                                          (32111)
                                                          (221111)
                                                          (11111111)

David A. Corneth, Table of n, a(n) for n = 0..82

For distinct instead of equal run-lengths we have A239455, ranked by A351294.
The complement for distinct run-lengths is A351293, ranked by A351295.
The complement is counted by A382915, ranked by A382879, by signature A382914.
A000041 counts integer partitions, strict A000009.
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.
A382857 counts permutations of prime indices with equal run-lengths, firsts A382878.
Cf. A003242, A047966, A164707, A238279, A351201, A351290, A351291, A353837, A353851, A382858.

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

More terms from Bert Dobbelaere, Apr 26 2025

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

A382878 Set of positions of first appearances in A382857 (permutations of prime indices with equal run-lengths).

Original entry on oeis.org

1, 6, 24, 30, 36, 180, 210, 360, 420, 720, 1080, 1260, 1800, 2160, 2310, 2520, 3600, 4620, 5040, 5400, 6300, 7560, 10800, 12600, 13860, 15120, 21600, 25200, 25920, 27000, 27720, 30030, 32400, 37800, 44100, 45360, 46656, 50400, 54000, 55440, 60060, 60480, 64800

Offset: 1

Gus Wiseman, Apr 09 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 permutations for n = 6, 720, 36, 25920, 30:
  (1,2)  (1,2,1,2,1,3,1)  (1,1,2,2)  (1,2,1,2,1,2,1,2,1,3,1)  (1,2,3)
  (2,1)  (1,2,1,3,1,2,1)  (1,2,1,2)  (1,2,1,2,1,2,1,3,1,2,1)  (1,3,2)
         (1,3,1,2,1,2,1)  (2,1,2,1)  (1,2,1,2,1,3,1,2,1,2,1)  (2,1,3)
                          (2,2,1,1)  (1,2,1,3,1,2,1,2,1,2,1)  (2,3,1)
                                     (1,3,1,2,1,2,1,2,1,2,1)  (3,1,2)
                                                              (3,2,1)
The terms together with their prime indices begin:
      1: {}
      6: {1,2}
     24: {1,1,1,2}
     30: {1,2,3}
     36: {1,1,2,2}
    180: {1,1,2,2,3}
    210: {1,2,3,4}
    360: {1,1,1,2,2,3}
    420: {1,1,2,3,4}
    720: {1,1,1,1,2,2,3}
   1080: {1,1,1,2,2,2,3}
   1260: {1,1,2,2,3,4}
   1800: {1,1,1,2,2,3,3}
   2160: {1,1,1,1,2,2,2,3}
   2310: {1,2,3,4,5}
   2520: {1,1,1,2,2,3,4}
   3600: {1,1,1,1,2,2,3,3}

Positions of first appearances in A382857 (zeros A382879), by signature A382858.
For distinct run-lengths we have A382772, firsts of A382771 (by signature A382773).
A140690 lists numbers whose binary expansion has equal run-lengths, distinct A044813.
A056239 adds up prime indices, row sums of A112798.
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. A000720, A001221, A001222, A003242, A048767, A098859, A130091, A238130, A305936, A351013, A351202, A382876.

y=Table[Length[Select[Permutations[Join@@ConstantArray@@@FactorInteger[n]],SameQ@@Length/@Split[#]&]],{n,0,1000}];
fip[y_]:=Select[Range[Length[y]],!MemberQ[Take[y,#-1],y[[#]]]&];
fip[Rest[y]]

A382914 Numbers k such that it is not possible to permute a multiset whose multiplicities are the prime indices of k so that the run-lengths are all equal.

Original entry on oeis.org

10, 14, 22, 26, 28, 33, 34, 38, 39, 44, 46, 51, 52, 55, 57, 58, 62, 66, 68, 69, 74, 76, 78, 82, 85, 86, 87, 88, 92, 93, 94, 95, 102, 104, 106, 111, 114, 115, 116, 118, 119, 122, 123, 124, 129, 130, 134, 136, 138, 141, 142, 145, 146, 148, 152, 153, 155, 156

Offset: 1

Gus Wiseman, Apr 09 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:
  10: {1,3}
  14: {1,4}
  22: {1,5}
  26: {1,6}
  28: {1,1,4}
  33: {2,5}
  34: {1,7}
  38: {1,8}
  39: {2,6}
  44: {1,1,5}
  46: {1,9}
  51: {2,7}
  52: {1,1,6}
  55: {3,5}
  57: {2,8}
  58: {1,10}
  62: {1,11}
  66: {1,2,5}

For anti-run permutations we have A335126, complement A335127.
Zeros of A382858, anti-run A335125.
For prime indices instead of signature we have A382879, counted by A382915.
For distinct run-lengths we have A382912 (zeros of A382773), complement A382913.
A003963 gives product of prime indices.
A056239 adds up prime indices, row sums of A112798.
A140690 lists numbers whose binary expansion has equal run-lengths, distinct A044813.
A304442 counts partitions with equal run-sums, ranks A353833.
A164707 lists numbers whose binary form has equal runs of ones, distinct A328592.
A329738 counts compositions with equal run-lengths, ranks A353744.
A329739 counts compositions with distinct run-lengths, ranks A351596, complement A351291.
Cf. A382857 (firsts A382878), A382771 (firsts A382772).
Cf. A000720, A000961, A001221, A001222, A048767, A181821, A305936, A351013, A382877.

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

A382774 Number of ways to permute the prime indices of n! so that the run-lengths are all different.

Original entry on oeis.org

1, 1, 1, 0, 2, 0, 6, 0, 0, 0, 96, 0

Offset: 0

Gus Wiseman, Apr 09 2025

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 24 are {1,1,1,2}, with permutations (1,1,1,2) and (2,1,1,1), so a(4) = 2.

For anti-run permutations we have A335407, see also A335125, A382858.
This is the restriction of A382771 to the factorials A000142, equal A382857.
A022559 counts prime indices of n!, sum A081401.
A044813 lists numbers whose binary expansion has distinct run-lengths, equal A140690.
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.
A328592 lists numbers whose binary form has distinct runs of ones, equal A164707.
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. A000720, A001221, A001222, A003242, A048767, A130091, A181821, A351013, A351202, A360015, A382773, A382879.

Table[Length[Select[Permutations[prix[n!]],UnsameQ@@Length/@Split[#]&]],{n,0,6}]

a(n) = A382771(n!).

cp's OEIS Frontend

A382857 Number of ways to permute the prime indices of n so that the run-lengths are all equal.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A382879 Positions of 0 in A382857 (permutations of prime indices with equal run-lengths).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A382912 Numbers k such that row k of A305936 (a multiset whose multiplicities are the prime indices of k) has no permutation with all distinct run-lengths.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A382913 Numbers k such that row k of A305936 (a multiset whose multiplicities are the prime indices of k) has a permutation with all distinct run-lengths.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A382771 Number of ways to permute the prime indices of n so that the run-lengths are all different.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A383013 Number of integer partitions of n having a permutation with all equal run-lengths.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Extensions

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

A382878 Set of positions of first appearances in A382857 (permutations of prime indices with equal run-lengths).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A382914 Numbers k such that it is not possible to permute a multiset whose multiplicities are the prime indices of k so that the run-lengths are all equal.

Views

Author