A357977 -id:A357977 - cp's OEIS frontend

A387133 Number of ways to choose a sequence of distinct integer partitions, one of each prime factor of n (with multiplicity).

1, 2, 3, 2, 7, 6, 15, 0, 6, 14, 56, 6, 101, 30, 21, 0, 297, 12, 490, 14, 45, 112, 1255, 0, 42, 202, 6, 30, 4565, 42, 6842, 0, 168, 594, 105, 12, 21637, 980, 303, 0, 44583, 90, 63261, 112, 42, 2510, 124754, 0, 210, 84, 891, 202, 329931, 12, 392, 0, 1470, 9130

Offset: 1

Gus Wiseman, Aug 26 2025

			The prime factors of 9 are (3,3), and the a(9) = 6 choices are:
  ((3),(2,1))
  ((3),(1,1,1))
  ((2,1),(3))
  ((2,1),(1,1,1))
  ((1,1,1),(3))
  ((1,1,1),(2,1))

For prime factors instead of partitions we have A008966, see A355741.
Twice partitions of this type are counted by A296122.
For prime indices instead of factors we have A387110, see A387136.
For strict partitions and prime indices we have A387115.
For constant partitions and prime indices we have A387120.
Positions of zero are A387326, for indices apparently A276079 (complement A276078).
Allowing repeated partitions gives A387327, see A299200, A357977.
A000041 counts integer partitions, strict A000009.
A003963 multiplies together prime indices.
A112798 lists prime indices, row sums A056239 or A066328, lengths A001222.
A120383 lists numbers divisible by all of their prime indices.
A289509 lists numbers with relatively prime prime indices.
Cf. A063834, A261049, A299201, A335433, A335448, A355739, A383706, A387111, A387135.

Table[Length[Select[Tuples[IntegerPartitions/@Flatten[ConstantArray@@@FactorInteger[n]]],UnsameQ@@#&]],{n,30}]

A357853 Fully multiplicative with a(prime(k)) = A000009(k+1).

Original entry on oeis.org

1, 1, 2, 1, 2, 2, 3, 1, 4, 2, 4, 2, 5, 3, 4, 1, 6, 4, 8, 2, 6, 4, 10, 2, 4, 5, 8, 3, 12, 4, 15, 1, 8, 6, 6, 4, 18, 8, 10, 2, 22, 6, 27, 4, 8, 10, 32, 2, 9, 4, 12, 5, 38, 8, 8, 3, 16, 12, 46, 4, 54, 15, 12, 1, 10, 8, 64, 6, 20, 6, 76, 4, 89, 18, 8, 8, 12, 10

Offset: 1

Gus Wiseman, Oct 28 2022

			We have 525 = prime(2)*prime(3)*prime(3)*prime(4) so a(525) = Q(3)*Q(4)*Q(4)*Q(5) = 2*2*2*3 = 24, where Q = A000009.

Other multiplicative sequences: A003961, A064988, A064989, A357852, A357980.
The non-strict version is A003964.
The unshifted horizontal version is A357978, non-strict A357977.
The unshifted version is A357982.
A000040 lists the primes.
A056239 adds up prime indices, row-sums of A112798.
Cf. A000009, A000720, A076610, A273873, A296150, A357979.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
ptf[f_][n_]:=Product[f[i],{i,primeMS[n]}];
Array[ptf[PartitionsQ[#+1]&],100]

A357984 Replace prime(k) with A000720(k) in the prime factorization of n.

Original entry on oeis.org

1, 0, 1, 0, 2, 0, 2, 0, 1, 0, 3, 0, 3, 0, 2, 0, 4, 0, 4, 0, 2, 0, 4, 0, 4, 0, 1, 0, 4, 0, 5, 0, 3, 0, 4, 0, 5, 0, 3, 0, 6, 0, 6, 0, 2, 0, 6, 0, 4, 0, 4, 0, 6, 0, 6, 0, 4, 0, 7, 0, 7, 0, 2, 0, 6, 0, 8, 0, 4, 0, 8, 0, 8, 0, 4, 0, 6, 0, 8, 0, 1, 0, 9, 0, 8, 0, 4

Offset: 1

Gus Wiseman, Oct 25 2022

			We have 91 = prime(4) * prime(6), so a(91) = pi(4) * pi(6) = 6.

Other multiplicative sequences: A003961, A357852, A064988, A064989, A357983.
The version for p instead of pi is A299200, horz A357977, strict A357982.
The version for nu is A355741.
The version for bigomega is A355742.
The horizontal version is A357980.
A000040 lists the prime numbers.
A000720 is PrimePi.
A056239 adds up prime indices, row-sums of A112798.
Cf. A033879, A033880, A063834, A066207, A076610, A296150, A357975.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Table[Times@@PrimePi/@primeMS[n],{n,100}]

A357981 Numbers whose prime indices have only prime numbers as their own prime indices.

Original entry on oeis.org

1, 2, 4, 5, 8, 10, 11, 16, 20, 22, 23, 25, 31, 32, 40, 44, 46, 47, 50, 55, 59, 62, 64, 80, 88, 92, 94, 97, 100, 103, 110, 115, 118, 121, 124, 125, 127, 128, 137, 155, 160, 176, 179, 184, 188, 194, 197, 200, 206, 220, 230, 233, 235, 236, 242, 248, 250, 253, 254

Offset: 1

Gus Wiseman, Oct 23 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.

Numbers whose prime indices are prime numbers are listed by A076610.

			The terms together with their prime indices begin:
     1: {}
     2: {1}
     4: {1,1}
     5: {3}
     8: {1,1,1}
    10: {1,3}
    11: {5}
    16: {1,1,1,1}
    20: {1,1,3}
    22: {1,5}
    23: {9}
    25: {3,3}
    31: {11}
    32: {1,1,1,1,1}

Contains all elements of A000079.
Contains all primes indexed by elements of A076610.
A000040 lists the prime numbers.
A056239 adds up prime indices, row-sums of A112798.
Cf. A003961, A045966, A064988, A066207, A215366, A357977, A357980, A357983.

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

A387116 Number of ways to choose a constant sequence of integer partitions, one of each prime index of n.

Original entry on oeis.org

1, 1, 2, 1, 3, 0, 5, 1, 2, 0, 7, 0, 11, 0, 0, 1, 15, 0, 22, 0, 0, 0, 30, 0, 3, 0, 2, 0, 42, 0, 56, 1, 0, 0, 0, 0, 77, 0, 0, 0, 101, 0, 135, 0, 0, 0, 176, 0, 5, 0, 0, 0, 231, 0, 0, 0, 0, 0, 297, 0, 385, 0, 0, 1, 0, 0, 490, 0, 0, 0, 627, 0, 792, 0, 0, 0, 0, 0

Offset: 1

Gus Wiseman, Aug 21 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.

If n is a prime power prime(x)^y, then a(n) is the number of integer partitions of x; otherwise, a(n) = 0.

			The a(49) = 5 choices:
  ((4),(4))
  ((3,1),(3,1))
  ((2,2),(2,2))
  ((2,1,1),(2,1,1))
  ((1,1,1,1),(1,1,1,1))

Positions of zeros are A024619, complement A000961.
Twice-partitions of this type are counted by A047968, see also A296122.
For initial intervals instead of partitions we have A055396, see also A387111.
This is the constant case of A299200, see also A357977, A357982.
For disjoint instead of constant we have A383706.
For distinct instead of constant we have A387110.
For divisors instead of partitions we have A387114, see also A355731, A355739.
For strict partitions instead of partitions we have A387117.
A000041 counts integer partitions, strict A000009.
A003963 multiplies together prime indices.
A112798 lists prime indices, row sums A056239 or A066328, lengths A001222.
A120383 lists numbers divisible by all of their prime indices.
A289509 lists numbers with relatively prime prime indices.
Cf. A008284, A063834, A276078, A335433, A335448, A355529, A355741, A387115, A387120, A387133, A387136.

Table[Switch[n,1,1,?PrimePowerQ,PartitionsP[PrimePi[FactorInteger[n][[1,1]]]],,0],{n,100}]

a(n) = A000041(A297109(n)).

cp's OEIS Frontend

A387133 Number of ways to choose a sequence of distinct integer partitions, one of each prime factor of n (with multiplicity).

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A357853 Fully multiplicative with a(prime(k)) = A000009(k+1).

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A357984 Replace prime(k) with A000720(k) in the prime factorization of n.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A357981 Numbers whose prime indices have only prime numbers as their own prime indices.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A387116 Number of ways to choose a constant sequence of integer partitions, one of each prime index of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula