A320893 -id:A320893 - cp's OEIS frontend

A339842 Heinz numbers of non-graphical, multigraphical integer partitions of even numbers.

9, 25, 30, 49, 63, 70, 75, 84, 100, 121, 147, 154, 165, 169, 175, 189, 196, 198, 210, 220, 250, 264, 273, 280, 286, 289, 325, 343, 351, 361, 363, 364, 385, 390, 441, 442, 462, 468, 484, 490, 495, 507, 520, 525, 529, 550, 561, 588, 594, 595, 616, 624, 637, 646

Offset: 1

Gus Wiseman, Dec 27 2020

nonn

An integer partition is graphical if it comprises the multiset of vertex-degrees of some graph, and multigraphical if it comprises the multiset of vertex-degrees of some multigraph.

The Heinz number of an integer 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 terms together with their prime indices begins:
      9: {2,2}        189: {2,2,2,4}      363: {2,5,5}
     25: {3,3}        196: {1,1,4,4}      364: {1,1,4,6}
     30: {1,2,3}      198: {1,2,2,5}      385: {3,4,5}
     49: {4,4}        210: {1,2,3,4}      390: {1,2,3,6}
     63: {2,2,4}      220: {1,1,3,5}      441: {2,2,4,4}
     70: {1,3,4}      250: {1,3,3,3}      442: {1,6,7}
     75: {2,3,3}      264: {1,1,1,2,5}    462: {1,2,4,5}
     84: {1,1,2,4}    273: {2,4,6}        468: {1,1,2,2,6}
    100: {1,1,3,3}    280: {1,1,1,3,4}    484: {1,1,5,5}
    121: {5,5}        286: {1,5,6}        490: {1,3,4,4}
    147: {2,4,4}      289: {7,7}          495: {2,2,3,5}
    154: {1,4,5}      325: {3,3,6}        507: {2,6,6}
    165: {2,3,5}      343: {4,4,4}        520: {1,1,1,3,6}
    169: {6,6}        351: {2,2,2,6}      525: {2,3,3,4}
    175: {3,3,4}      361: {8,8}          529: {9,9}
For example, a complete list of all multigraphs with degrees (4,2,2,2) is:
  {{1,2},{1,2},{1,3},{1,4},{3,4}}
  {{1,2},{1,3},{1,3},{1,4},{2,4}}
  {{1,2},{1,3},{1,4},{1,4},{2,3}}
Since none of these is strict, i.e., a graph, the Heinz number 189 is in the sequence.

Eric Weisstein's World of Mathematics, Degree Sequence.
Gus Wiseman, Counting and ranking factorizations, factorability, and vertex-degree partitions for groupings into pairs.

See link for additional cross references.
Distinct prime shadows (images under A181819) of A340017.
A000070 counts non-multigraphical partitions (A339620).
A000569 counts graphical partitions (A320922).
A027187 counts partitions of even length (A028260).
A058696 counts partitions of even numbers (A300061).
A096373 cannot be partitioned into strict pairs.
A209816 counts multigraphical partitions (A320924).
A320663/A339888 count unlabeled multiset partitions into singletons/pairs.
A320893 can be partitioned into distinct pairs but not into strict pairs.
A339560 can be partitioned into distinct strict pairs.
A339617 counts non-graphical partitions of 2n (A339618).
A339659 counts graphical partitions of 2n into k parts.
Cf. A004251, A006129, A007717, A056239, A095268, A112798, A181821, A305936, A318284, A339559.

strr[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[strr[n/d],Min@@#>=d&]],{d,Select[Divisors[n],And[SquareFreeQ[#],PrimeOmega[#]==2]&]}]];
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],EvenQ[Length[nrmptn[#]]]&& Select[strr[Times@@Prime/@nrmptn[#]],UnsameQ@@#&]=={}&&strr[Times@@Prime/@nrmptn[#]]!={}&]

Equals A320924 /\ A339618.

Equals A320924 \ A320922.

A339889 Products of distinct primes or semiprimes.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 65, 66, 67, 68, 69, 70

Offset: 1

Gus Wiseman, Dec 23 2020

nonn

Numbers that can be factored into distinct primes or semiprimes.

A semiprime (A001358) is a product of any two prime numbers.

			See A339840 for examples.

Robert Israel, Table of n, a(n) for n = 1..10000
Gus Wiseman, Counting and ranking factorizations, factorability, and vertex-degree partitions for groupings into pairs.

See link for additional cross-references.
Allowing only primes gives A005117.
Not allowing squares of primes gives A339741.
Positions of nonzeros in A339839.
Complement of A339840.
A001055 counts factorizations.
A001358 lists semiprimes, with squarefree case A006881.
A320663 counts non-isomorphic multiset partitions into singletons or pairs.
A320732 counts factorizations into primes or semiprimes.
A339742 counts factorizations into distinct primes or squarefree semiprimes.
A339841 have exactly one factorization into primes or semiprimes.
Cf. A002100, A013929, A293511, A320893, A339740, A339846.

N:= 100: # for terms <= N
B:= select(t -> numtheory:-bigomega(t) <= 2, {$2..N}):
S:= {1}:
for b in B do
  S:= S union map(`*`,select(`<=`,S,N/b),b)
od:
sort(convert(S,list)); # Robert Israel, Dec 28 2020

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

A320913 Numbers with an even number of prime factors (counted with multiplicity) that cannot be factored into squarefree semiprimes (A320891) but can be factored into distinct semiprimes (A320912).

Original entry on oeis.org

4, 9, 24, 25, 40, 49, 54, 56, 88, 104, 121, 135, 136, 152, 169, 184, 189, 232, 240, 248, 250, 289, 296, 297, 328, 336, 344, 351, 361, 375, 376, 424, 459, 472, 488, 513, 528, 529, 536, 560, 568, 584, 621, 624, 632, 664, 686, 712, 776, 783, 808, 810, 816, 824

Offset: 1

Gus Wiseman, Oct 23 2018

nonn

A semiprime (A001358) is a product of any two not necessarily distinct primes.

If A025487(k) is contained in this sequence then so is every positive integer with its prime signature. - David A. Corneth, Oct 24 2018

Cf. A001055, A001222, A001358, A005117, A006881, A007717, A025487, A028260, A320655, A320656, A320891, A320892, A320893, A320894, A320911, A320912.

sqfsemfacs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[sqfsemfacs[n/d],Min@@#>=d&]],{d,Select[Rest[Divisors[n]],And[SquareFreeQ[#],PrimeOmega[#]==2]&]}]];
strsemfacs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[strsemfacs[n/d],Min@@#>d&]],{d,Select[Rest[Divisors[n]],PrimeOmega[#]==2&]}]];
Select[Range[1000],And[EvenQ[PrimeOmega[#]],strsemfacs[#]!={},sqfsemfacs[#]=={}]&]

A340017 Products of squarefree semiprimes that are not products of distinct squarefree semiprimes.

Original entry on oeis.org

36, 100, 196, 216, 225, 360, 441, 484, 504, 540, 600, 676, 756, 792, 936, 1000, 1089, 1156, 1176, 1188, 1224, 1225, 1296, 1350, 1368, 1400, 1404, 1444, 1500, 1521, 1656, 1836, 1960, 2052, 2088, 2116, 2160, 2200, 2232, 2250, 2484, 2600, 2601, 2646, 2664, 2744

Offset: 1

Gus Wiseman, Dec 30 2020

nonn

Of course, every number is a product of squarefree numbers (A050320).
A squarefree semiprime (A006881) is a product of any two distinct prime numbers.
All terms have even Omega (A001222, A028260).

			The sequence of terms together with their prime indices begins:
      36: {1,1,2,2}        1000: {1,1,1,3,3,3}
     100: {1,1,3,3}        1089: {2,2,5,5}
     196: {1,1,4,4}        1156: {1,1,7,7}
     216: {1,1,1,2,2,2}    1176: {1,1,1,2,4,4}
     225: {2,2,3,3}        1188: {1,1,2,2,2,5}
     360: {1,1,1,2,2,3}    1224: {1,1,1,2,2,7}
     441: {2,2,4,4}        1225: {3,3,4,4}
     484: {1,1,5,5}        1296: {1,1,1,1,2,2,2,2}
     504: {1,1,1,2,2,4}    1350: {1,2,2,2,3,3}
     540: {1,1,2,2,2,3}    1368: {1,1,1,2,2,8}
     600: {1,1,1,2,3,3}    1400: {1,1,1,3,3,4}
     676: {1,1,6,6}        1404: {1,1,2,2,2,6}
     756: {1,1,2,2,2,4}    1444: {1,1,8,8}
     792: {1,1,1,2,2,5}    1500: {1,1,2,3,3,3}
     936: {1,1,1,2,2,6}    1521: {2,2,6,6}
For example, a complete list of all factorizations of 7560 into squarefree semiprimes is:
  7560 = (6*6*6*35) = (6*6*10*21) = (6*6*14*15),
but since none of these is strict, 7560 is in the sequence.

Eric Weisstein's World of Mathematics, Degree Sequence.
Gus Wiseman, Counting and ranking factorizations, factorability, and vertex-degree partitions for groupings into pairs.

See link for additional cross references.
The distinct prime shadows (under A181819) of these terms are A339842.
Factorizations into squarefree semiprimes are counted by A320656.
Products of squarefree semiprimes that are not products of distinct semiprimes are A320893.
Factorizations into distinct squarefree semiprimes are A339661.
For the next four lines, we list numbers with even Omega (A028260).
- A320891 cannot be factored into squarefree semiprimes.
- A320894 cannot be factored into distinct squarefree semiprimes.
- A320911 can be factored into squarefree semiprimes.
- A339561 can be factored into distinct squarefree semiprimes.
A001358 lists semiprimes, with squarefree case A006881.
A002100 counts partitions into squarefree semiprimes.
A030229 lists squarefree numbers with even Omega.
A050320 counts factorizations into squarefree numbers.
A050326 counts factorizations into distinct squarefree numbers.
A181819 is the Heinz number of the prime signature of n (prime shadow).
A320656 counts factorizations into squarefree semiprimes.
A339560 can be partitioned into distinct strict pairs.
Cf. A001055, A001222, A005117, A007717, A096373, A112798, A300061, A322353, A339559, A338899, A339740.

strr[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[strr[n/d],Min@@#>=d&]],{d,Select[Divisors[n],And[SquareFreeQ[#],PrimeOmega[#]==2]&]}]];
Select[Range[1000],Select[strr[#],UnsameQ@@#&]=={}&&strr[#]!={}&]

Equals A320894 /\ A320911.

Numbers n such that A320656(n) > 0 but A339661(n) = 0.

cp's OEIS Frontend

A339842 Heinz numbers of non-graphical, multigraphical integer partitions of even numbers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A339889 Products of distinct primes or semiprimes.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

A320913 Numbers with an even number of prime factors (counted with multiplicity) that cannot be factored into squarefree semiprimes (A320891) but can be factored into distinct semiprimes (A320912).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A340017 Products of squarefree semiprimes that are not products of distinct squarefree semiprimes.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula