A320659 -id:A320659 - cp's OEIS frontend

A320655 Number of factorizations of n into semiprimes. Number of multiset partitions of the multiset of prime factors of n, into pairs.

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

Offset: 1

Gus Wiseman, Oct 18 2018

nonn

The characteristic function of nonzero terms is A065043. - R. J. Mathar, Jan 18 2021

			The a(900) = 5 factorizations into semiprimes:
  900 = (4*9*25)
  900 = (4*15*15)
  900 = (6*6*25)
  900 = (6*10*15)
  900 = (9*10*10)
The a(900) = 5 multiset partitions into pairs:
  {{1,1},{2,2},{3,3}}
  {{1,1},{2,3},{2,3}}
  {{1,2},{1,2},{3,3}}
  {{1,2},{1,3},{2,3}}
  {{2,2},{1,3},{1,3}}

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

The positions of zeros are A026424.

Cf. A001055, A001222, A001358, A007716, A007717, A056239, A112798, A318871, A318953, A320462, A320656, A320658, A320659.

semfacs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[semfacs[n/d],Min@@#>=d&]],{d,Select[Rest[Divisors[n]],PrimeOmega[#]==2&]}]];
Table[Length[semfacs[n]],{n,100}]

A320655(n, m=n) = if(1==n, 1, my(s=0); fordiv(n, d, if((2==bigomega(d)&&(d<=m)), s += A320655(n/d, d))); (s)); \\ Antti Karttunen, Dec 06 2020

Data section extended up to 105 terms by Antti Karttunen, Dec 06 2020

A320656 Number of factorizations of n into squarefree semiprimes. Number of multiset partitions of the multiset of prime factors of n, into strict pairs.

Original entry on oeis.org

1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0

Offset: 1

Gus Wiseman, Oct 18 2018

nonn

			The a(4620) = 6 factorizations into squarefree semiprimes:
  4620 = (6*10*77)
  4620 = (6*14*55)
  4620 = (6*22*35)
  4620 = (10*14*33)
  4620 = (10*21*22)
  4620 = (14*15*22)
The a(4620) = 6 multiset partitions into strict pairs:
  {{1,2},{1,3},{4,5}}
  {{1,2},{1,4},{3,5}}
  {{1,2},{1,5},{3,4}}
  {{1,3},{1,4},{2,5}}
  {{1,3},{2,4},{1,5}}
  {{1,4},{2,3},{1,5}}
The a(69300) = 10 factorizations into squarefree semiprimes:
  69300 = (6*6*35*55)
  69300 = (6*10*15*77)
  69300 = (6*10*21*55)
  69300 = (6*10*33*35)
  69300 = (6*14*15*55)
  69300 = (6*15*22*35)
  69300 = (10*10*21*33)
  69300 = (10*14*15*33)
  69300 = (10*15*21*22)
  69300 = (14*15*15*22)
The a(69300) = 10 multiset partitions into strict pairs:
  {{1,2},{1,2},{3,4},{3,5}}
  {{1,2},{1,3},{2,3},{4,5}}
  {{1,2},{1,3},{2,4},{3,5}}
  {{1,2},{1,3},{2,5},{3,4}}
  {{1,2},{1,4},{2,3},{3,5}}
  {{1,2},{2,3},{1,5},{3,4}}
  {{1,3},{1,3},{2,4},{2,5}}
  {{1,3},{1,4},{2,3},{2,5}}
  {{1,3},{2,3},{2,4},{1,5}}
  {{1,4},{2,3},{2,3},{1,5}}.
The a(210) = 3 factorizations into squarefree semiprimes: 210 = (6*35) = (10*21) = (14*15). - _Antti Karttunen_, Nov 02 2022

Antti Karttunen, Table of n, a(n) for n = 1..100000
Index entries for sequences computed from exponents in factorization of n

Cf. A001055, A002110, A006881, A079275, A007716, A007717, A045778, A123023, A318871, A318953, A320462, A320655, A320658, A320659.

bepfacs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[bepfacs[n/d],Min@@#>=d&]],{d,Select[Rest[Divisors[n]],SquareFreeQ[#]&&PrimeOmega[#]==2&]}]];
Table[Length[bepfacs[n]],{n,100}]

A320656(n, m=n) = if(1==n, 1, my(s=0); fordiv(n, d, if((d>1)&&(d<=m)&&issquarefree(d)&&2==bigomega(d), s += A320656(n/d, d))); (s)); \\ Antti Karttunen, Nov 02 2022

a(A002110(n)) = A123023(n). - Antti Karttunen, Nov 02 2022

Data section extended up to a(120) and the secondary offset added by Antti Karttunen, Nov 02 2022

A339661 Number of factorizations of n into distinct squarefree semiprimes.

Original entry on oeis.org

1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0

Offset: 1

Gus Wiseman, Dec 19 2020

nonn

A squarefree semiprime (A006881) is a product of any two distinct prime numbers.

Also the number of strict multiset partitions of the multiset of prime factors of n, into distinct strict pairs.

			The a(n) factorizations for n = 210, 1260, 4620, 30030, 69300 are respectively 3, 2, 6, 15, 7:
  (6*35)   (6*10*21)  (6*10*77)   (6*55*91)    (6*10*15*77)
  (10*21)  (6*14*15)  (6*14*55)   (6*65*77)    (6*10*21*55)
  (14*15)             (6*22*35)   (10*33*91)   (6*10*33*35)
                      (10*14*33)  (10*39*77)   (6*14*15*55)
                      (10*21*22)  (14*33*65)   (6*15*22*35)
                      (14*15*22)  (14*39*55)   (10*14*15*33)
                                  (15*22*91)   (10*15*21*22)
                                  (15*26*77)
                                  (21*22*65)
                                  (21*26*55)
                                  (22*35*39)
                                  (26*33*35)
                                  (6*35*143)
                                  (10*21*143)
                                  (14*15*143)

Antti Karttunen, Table of n, a(n) for n = 1..69300
Index entries for sequences computed from exponents in factorization of n

Dirichlet convolution of A008836 (Liouville's lambda) with A339742.
A050326 allows all squarefree numbers, non-strict case A050320.
A320656 is the not necessarily strict version.
A320911 lists all (not just distinct) products of squarefree semiprimes.
A322794 counts uniform factorizations, such as these.
A339561 lists positions of nonzero terms.
A001055 counts factorizations, with strict case A045778.
A001358 lists semiprimes, with squarefree case A006881.
A320655 counts factorizations into semiprimes, with strict case A322353.
The following count vertex-degree partitions and give their Heinz numbers:
- A000070 counts non-multigraphical partitions of 2n (A339620).
- A209816 counts multigraphical partitions (A320924).
- A339655 counts non-loop-graphical partitions of 2n (A339657).
- A339656 counts loop-graphical partitions (A339658).
- A339617 counts non-graphical partitions of 2n (A339618).
- A000569 counts graphical partitions (A320922).
The following count partitions of even length and give their Heinz numbers:
- A096373 cannot be partitioned into strict pairs (A320891).
- A338914 can be partitioned into strict pairs (A320911).
- A338915 cannot be partitioned into distinct pairs (A320892).
- A338916 can be partitioned into distinct pairs (A320912).
- A339559 cannot be partitioned into distinct strict pairs (A320894).
- A339560 can be partitioned into distinct strict pairs (A339561).
Cf. A001221, A005117, A007716, A028260, A280710, A300061, A320658, A320659, A320923, A330974.

bfacs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[bfacs[n/d],Min@@#>d&]],{d,Select[Rest[Divisors[n]],SquareFreeQ[#]&&PrimeOmega[#]==2&]}]];
Table[Length[bfacs[n]],{n,100}]

A280710(n) = (bigomega(n)==2*issquarefree(n)); \\ From A280710.
A339661(n, u=(1+n)) = if(1==n, 1, my(s=0); fordiv(n, d, if((d>1) && (dA280710(d), s += A339661(n/d, d))); (s)); \\ Antti Karttunen, May 02 2022

a(n) = Sum_{d|n} (-1)^A001222(d) * A339742(n/d).

More terms and secondary offset added by Antti Karttunen, May 02 2022

A320658 Number of factorizations of A181821(n) into semiprimes. Number of multiset partitions, of a multiset whose multiplicities are the prime indices of n, into pairs.

Original entry on oeis.org

1, 0, 1, 1, 0, 0, 1, 0, 2, 1, 0, 2, 1, 0, 0, 3, 0, 0, 1, 0, 2, 1, 0, 0, 2, 0, 5, 2, 1, 3, 0, 0, 0, 1, 0, 6, 1, 0, 2, 4, 0, 0, 1, 0, 0, 1, 0, 9, 3, 0, 0, 2, 1, 0, 2, 0, 2, 0, 0, 0, 1, 1, 6, 15, 0, 3, 0, 0, 0, 4, 1, 0, 0, 0, 6, 2, 0, 0, 1, 0, 17, 1, 0, 7, 2, 0

Offset: 1

Gus Wiseman, Oct 18 2018

nonn

This multiset is generally not the same as the multiset of prime indices of n. 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(84) = 7 factorizations into semiprimes:
  84 = (4*4*9*35)
  84 = (4*4*15*21)
  84 = (4*6*6*35)
  84 = (4*6*10*21)
  84 = (4*6*14*15)
  84 = (4*9*10*14)
  84 = (6*6*10*14)
The a(84) = 7 multiset partitions into pairs:
  {{1,1},{1,1},{2,2},{3,4}}
  {{1,1},{1,1},{2,3},{2,4}}
  {{1,1},{1,2},{1,2},{3,4}}
  {{1,1},{1,2},{1,3},{2,4}}
  {{1,1},{1,2},{1,4},{2,3}}
  {{1,1},{2,2},{1,3},{1,4}}
  {{1,2},{1,2},{1,3},{1,4}}

Cf. A001221, A001222, A007716, A007717, A056239, A112798, A181821, A305936, A318284, A320655, A320656, A320659.

nrmptn[n_]:=Join@@MapIndexed[Table[#2[[1]],{#1}]&,If[n==1,{},Flatten[Cases[FactorInteger[n]//Reverse,{p_,k_}:>Table[PrimePi[p],{k}]]]]];
bepfacs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[bepfacs[n/d],Min@@#>=d&]],{d,Select[Rest[Divisors[n]],PrimeOmega[#]==2&]}]];
Table[Length[bepfacs[Times@@Prime/@nrmptn[n]]],{n,100}]

A322075 Number of factorizations of n into nonprime squarefree numbers > 1.

Original entry on oeis.org

1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 1, 1, 1

Offset: 1

Gus Wiseman, Nov 25 2018

nonn

First term greater than 1 is a(210) = 4.

			The a(420) = 3 factorizations: (6*70), (10*42), (14*30).

G. C. Greubel, Table of n, a(n) for n = 1..10000

Cf. A000469, A001055, A001221, A001222, A005117, A007716, A318871, A318953, A320655, A320656, A320658, A320659.

sqnopfacs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[sqnopfacs[n/d],Min@@#>=d&]],{d,Select[Rest[Divisors[n]],!PrimeQ[#]&&SquareFreeQ[#]&]}]]
Table[Length[sqnopfacs[n]],{n,100}]

cp's OEIS Frontend

A320655 Number of factorizations of n into semiprimes. Number of multiset partitions of the multiset of prime factors of n, into pairs.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Extensions

A320656 Number of factorizations of n into squarefree semiprimes. Number of multiset partitions of the multiset of prime factors of n, into strict pairs.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A339661 Number of factorizations of n into distinct squarefree semiprimes.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A320658 Number of factorizations of A181821(n) into semiprimes. Number of multiset partitions, of a multiset whose multiplicities are the prime indices of n, into pairs.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A322075 Number of factorizations of n into nonprime squarefree numbers > 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica