A356944 -id:A356944 - cp's OEIS frontend

A356935 Numbers whose prime indices all have odd bigomega (number of prime factors with multiplicity). Products of primes indexed by elements of A026424. MM-numbers of finite multisets of finite odd-length multisets of positive integers.

1, 3, 5, 9, 11, 15, 17, 19, 25, 27, 31, 33, 37, 41, 45, 51, 55, 57, 59, 61, 67, 71, 75, 81, 83, 85, 93, 95, 99, 103, 107, 109, 111, 113, 121, 123, 125, 127, 131, 135, 153, 155, 157, 165, 171, 177, 179, 181, 183, 185, 187, 191, 193, 197, 201, 205, 209, 211, 213

Offset: 1

Gus Wiseman, Sep 12 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. We define the multiset of multisets with MM-number n to be formed by taking the multiset of prime indices of each part of the multiset of prime indices of n. The size of this multiset of multisets is A302242(n). For example, the prime indices of 78 are {1,2,6}, so the multiset of multisets with MM-number 78 is {{},{1},{1,2}}.

			The initial terms and corresponding multiset partitions:
   1: {}
   3: {{1}}
   5: {{2}}
   9: {{1},{1}}
  11: {{3}}
  15: {{1},{2}}
  17: {{4}}
  19: {{1,1,1}}
  25: {{2},{2}}
  27: {{1},{1},{1}}
  31: {{5}}
  33: {{1},{3}}
  37: {{1,1,2}}
  41: {{6}}
  45: {{1},{1},{2}}
  51: {{1},{4}}
  55: {{2},{3}}
  57: {{1},{1,1,1}}

Gus Wiseman, Counting and ranking classes of multiset partitions related to gapless multisets

A000041 counts integer partitions, strict A000009.
A000688 counts factorizations into prime powers.
A001055 counts factorizations.
A001221 counts prime divisors, sum A001414.
A001222 counts prime factors with multiplicity.
A056239 adds up prime indices, row sums of A112798.
Odd-size multisets are ctd by A000302, A027193, A058695, rkd by A026424.
Other types: A050330, A356932, A356933, A356934.
Other conditions: A302478, A302492, A356930, A356939, A356940, A356944, A356945.
Cf. A000040, A000720, A003963, A270995, A302242, A304969, A349050, A349055.

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

A356939 MM-numbers of multisets of intervals. Products of primes indexed by members of A073485.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 20, 22, 24, 25, 26, 27, 30, 31, 32, 33, 34, 36, 39, 40, 41, 44, 45, 47, 48, 50, 51, 52, 54, 55, 59, 60, 62, 64, 65, 66, 67, 68, 72, 75, 78, 80, 81, 82, 83, 85, 88, 90, 93, 94, 96, 99, 100, 102, 104, 108

Offset: 1

Gus Wiseman, Sep 12 2022

nonn

An interval such as {3,4,5} is a set of positive integers with all differences of adjacent elements equal to 1.
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.
We define the multiset of multisets with MM-number n to be formed by taking the multiset of prime indices of each part of the multiset of prime indices of n. The size of this multiset of multisets is A302242(n). For example, the prime indices of 78 are {1,2,6}, so the multiset of multisets with MM-number 78 is {{},{1},{1,2}}.

			The initial terms and corresponding multisets of multisets:
   1: {}
   2: {{}}
   3: {{1}}
   4: {{},{}}
   5: {{2}}
   6: {{},{1}}
   8: {{},{},{}}
   9: {{1},{1}}
  10: {{},{2}}
  11: {{3}}
  12: {{},{},{1}}
  13: {{1,2}}
  15: {{1},{2}}
  16: {{},{},{},{}}

Gus Wiseman, Counting and ranking classes of multiset partitions related to gapless multisets

The initial version is A356940.
Intervals are counted by A000012, A001227, ranked by A073485.
Other types: A107742, A356936, A356937, A356938.
Other conditions: A302478, A302492, A356930, A356935, A356944, A356955.
A000041 counts integer partitions, strict A000009.
A000688 counts factorizations into prime powers.
A001055 counts factorizations.
A001221 counts prime divisors, sum A001414.
A001222 counts prime factors with multiplicity.
A056239 adds up prime indices, row sums of A112798.
Cf. A000040, A000720, A003963, A055887, A076610, A270995, A302242, A304969.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
chQ[y_]:=Or[Length[y]<=1,Union[Differences[y]]=={1}];
Select[Range[100],And@@chQ/@primeMS/@primeMS[#]&]

A356941 Number of multiset partitions of integer partitions of n such that all blocks are gapless.

Original entry on oeis.org

1, 1, 3, 6, 13, 24, 49, 88, 166, 297, 534, 932, 1635, 2796, 4782, 8060, 13521, 22438, 37080, 60717, 98979, 160216, 258115, 413382, 659177, 1045636, 1651891, 2597849, 4069708, 6349677, 9871554, 15290322, 23604794, 36318256, 55705321, 85177643, 129865495

Offset: 0

Gus Wiseman, Sep 11 2022

nonn

A multiset is gapless if it covers an interval of positive integers. For example, {2,3,3,4} is gapless but {1,1,3,3} is not.

			The a(1) = 1 through a(4) = 13 multiset partitions:
  {{1}}  {{2}}      {{3}}          {{4}}
         {{1,1}}    {{1,2}}        {{2,2}}
         {{1},{1}}  {{1,1,1}}      {{1,1,2}}
                    {{1},{2}}      {{1},{3}}
                    {{1},{1,1}}    {{2},{2}}
                    {{1},{1},{1}}  {{1,1,1,1}}
                                   {{1},{1,2}}
                                   {{2},{1,1}}
                                   {{1},{1,1,1}}
                                   {{1,1},{1,1}}
                                   {{1},{1},{2}}
                                   {{1},{1},{1,1}}
                                   {{1},{1},{1},{1}}

Andrew Howroyd, Table of n, a(n) for n = 0..1000
Gus Wiseman, Counting and ranking classes of multiset partitions related to gapless multisets

A000041 counts integer partitions, strict A000009.
A000670 counts patterns, ranked by A333217, necklace A019536.
A001055 counts factorizations.
A011782 counts multisets covering an initial interval.
A356069 counts gapless divisors, initial A356224 (complement A356225).
Gapless multisets are counted by A034296, ranked by A073491.
Other types: A356233, A356942, A356943, A356944.
Other conditions: A001970, A006171, A007294, A089259, A107742, A356932.
Cf. A055887, A072233, A270995.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
mps[set_]:=Union[Sort[Sort/@(#/.x_Integer:>set[[x]])]&/@sps[Range[Length[set]]]];
nogapQ[m_]:=Or[m=={},Union[m]==Range[Min[m],Max[m]]];
Table[Length[Select[Join@@mps/@IntegerPartitions[n],And@@nogapQ/@#&]],{n,0,5}]

\\ Here G(n) gives A034296 as vector
G(N) = Vec(sum(n=1, N, x^n/(1-x^n) * prod(k=1, n-1, 1+x^k+O(x*x^(N-n))) ));
seq(n) = {my(u=G(n)); Vec(1/prod(k=1, n-1, (1 - x^k + O(x*x^n))^u[k])) } \\ Andrew Howroyd, Dec 30 2022

G.f.: 1/Product_{k>=1} (1 - x^k)^A034296(k). - Andrew Howroyd, Dec 30 2022

Terms a(11) and beyond from Andrew Howroyd, Dec 30 2022

A356942 Number of multisets of gapless multisets whose multiset union is a size-n multiset covering an initial interval.

Original entry on oeis.org

1, 1, 4, 15, 61, 249, 1040, 4363, 18424, 78014, 331099, 1407080, 5985505, 25477399, 108493103, 462147381, 1969025286, 8390475609, 35757524184, 152398429323, 649555719160, 2768653475487, 11801369554033, 50304231997727, 214428538858889, 914039405714237

Offset: 0

Gus Wiseman, Sep 08 2022

nonn

A multiset is gapless if it covers an interval of positive integers. For example, {2,3,3,4} is gapless but {1,1,3,3} is not.

			The a(1) = 1 through a(3) = 14 multiset partitions:
  {{1}}  {{1,1}}    {{1,1,1}}
         {{1,2}}    {{1,1,2}}
         {{1},{1}}  {{1,2,2}}
         {{1},{2}}  {{1,2,3}}
                    {{1},{1,1}}
                    {{1},{1,2}}
                    {{1},{2,2}}
                    {{1},{2,3}}
                    {{2},{1,1}}
                    {{2},{1,2}}
                    {{3},{1,2}}
                    {{1},{1},{1}}
                    {{1},{1},{2}}
                    {{1},{2},{2}}
                    {{1},{2},{3}}

Andrew Howroyd, Table of n, a(n) for n = 0..200
Gus Wiseman, Counting and ranking classes of multiset partitions related to gapless multisets

A000041 counts integer partitions, strict A000009.
A000670 counts patterns, ranked by A333217, necklace A019536.
A011782 counts multisets covering an initial interval.
Cf. A063834, A072233, A270995, A304969, A349050, A349055, A356934.
Gapless multisets are counted by A034296, ranked by A073491.
Other conditions: A034691, A055887, A116540, A255906, A356933, A356937.
Other types of multiset partitions: A356233, A356941, A356943, A356944.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
mps[set_]:=Union[Sort[Sort/@(#/.x_Integer:>set[[x]])]&/@sps[Range[Length[set]]]];
allnorm[n_]:=If[n<=0,{{}},Function[s,Array[Count[s,y_/;y<=#]+1&,n]]/@Subsets[Range[n-1]+1]];
nogapQ[m_]:=Or[m=={},Union[m]==Range[Min[m],Max[m]]];
Table[Length[Select[Join@@mps/@allnorm[n],And@@nogapQ/@#&]],{n,0,5}]

EulerT(v)={Vec(exp(x*Ser(dirmul(v,vector(#v,n,1/n))))-1, -#v)}
R(n,k) = {EulerT(vector(n, j, sum(i=1, min(k, j), (k-i+1)*binomial(j-1, i-1))))}
seq(n) = {my(A=1+O(y*y^n)); for(k = 1, n, A += x^k*(1 + y*Ser(R(n,k), y) - polcoef(1/(1 - x*A) + O(x^(k+2)), k+1))); Vec(subst(A,x,1))} \\ Andrew Howroyd, Jan 01 2023

Terms a(9) and beyond from Andrew Howroyd, Jan 01 2023

A356930 Numbers whose prime indices have all odd prime indices. MM-numbers of finite multisets of finite multisets of odd numbers.

Original entry on oeis.org

1, 2, 3, 4, 6, 7, 8, 9, 11, 12, 14, 16, 18, 19, 21, 22, 24, 27, 28, 29, 31, 32, 33, 36, 38, 42, 44, 48, 49, 53, 54, 56, 57, 58, 59, 62, 63, 64, 66, 71, 72, 76, 77, 79, 81, 83, 84, 87, 88, 93, 96, 97, 98, 99, 106, 108, 112, 114, 116, 118, 121, 124, 126, 127

Offset: 1

Gus Wiseman, Sep 11 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. We define the multiset of multisets with MM-number n to be formed by taking the multiset of prime indices of each part of the multiset of prime indices of n. The combined size of this multiset of multisets is A302242(n). For example, the prime indices of 78 are {1,2,6}, so the multiset of multisets with MM-number 78 is {{},{1},{1,2}}.

			The initial terms and corresponding multisets of multisets:
   1: {}
   2: {{}}
   3: {{1}}
   4: {{},{}}
   6: {{},{1}}
   7: {{1,1}}
   8: {{},{},{}}
   9: {{1},{1}}
  11: {{3}}
  12: {{},{},{1}}
  14: {{},{1,1}}
  16: {{},{},{},{}}
  18: {{},{1},{1}}
  19: {{1,1,1}}
  21: {{1},{1,1}}
  22: {{},{3}}
  24: {{},{},{},{1}}
  27: {{1},{1},{1}}
  28: {{},{},{1,1}}
  29: {{1,3}}
  31: {{5}}
  32: {{},{},{},{},{}}

Gus Wiseman, Counting and ranking classes of multiset partitions related to gapless multisets

Multisets of odd numbers are counted by A000009, ranked by A066208.
Factorizations of this type are counted by A356931.
The version for odd lengths instead of parts is A356935, ranked by A089259.
Other conditions: A302478, A302492, A356939, A356940, A356944, A356955.
A000041 counts integer partitions, strict A000009.
A000688 counts factorizations into prime powers.
A001055 counts factorizations.
A001221 counts prime divisors, sum A001414.
A001222 counts prime factors with multiplicity.
A056239 adds up prime indices, row sums of A112798.
Cf. A000720, A003963, A011782, A055887, A076610, A302242, A304969.

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

A356940 MM-numbers of multisets of initial intervals. Products of elements of A062447 (primes indexed by primorials A002110).

Original entry on oeis.org

1, 2, 3, 4, 6, 8, 9, 12, 13, 16, 18, 24, 26, 27, 32, 36, 39, 48, 52, 54, 64, 72, 78, 81, 96, 104, 108, 113, 117, 128, 144, 156, 162, 169, 192, 208, 216, 226, 234, 243, 256, 288, 312, 324, 338, 339, 351, 384, 416, 432, 452, 468, 486, 507, 512, 576, 624, 648

Offset: 1

Gus Wiseman, Sep 12 2022

nonn

An initial interval is a set {1,2,...,n}  for some n >= 0.
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.
We define the multiset of multisets with MM-number n to be formed by taking the multiset of prime indices of each part of the multiset of prime indices of n. The size of this multiset of multisets is A302242(n). For example, the prime indices of 78 are {1,2,6}, so the multiset of multisets with MM-number 78 is {{},{1},{1,2}}.

			The initial terms and corresponding multisets of multisets:
   1: {}
   2: {{}}
   3: {{1}}
   4: {{},{}}
   6: {{},{1}}
   8: {{},{},{}}
   9: {{1},{1}}
  12: {{},{},{1}}
  13: {{1,2}}
  16: {{},{},{},{}}
  18: {{},{1},{1}}
  24: {{},{},{},{1}}
  26: {{},{1,2}}
  27: {{1},{1},{1}}
  32: {{},{},{},{},{}}
  36: {{},{},{1},{1}}
  39: {{1},{1,2}}
  48: {{},{},{},{},{1}}
  52: {{},{},{1,2}}
  54: {{},{1},{1},{1}}
  64: {{},{},{},{},{},{}}

Gus Wiseman, Counting and ranking classes of multiset partitions related to gapless multisets

This is the initial version of A356939.
Initial intervals are counted by A010054, ranked by A002110.
Other types: A007294, A322585.
Other conditions: A302478, A302492, A356930, A356935, A356944, A356955.
A000041 counts integer partitions, strict A000009.
A000688 counts factorizations into prime powers.
A001055 counts factorizations.
A001221 counts prime divisors, sum A001414.
A001222 counts prime factors with multiplicity.
A056239 adds up prime indices, row sums of A112798.
Cf. A000040, A000720, A003963, A055887, A076610, A302242, A304969.

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

A356943 Number of multiset partitions into gapless blocks of a size-n multiset covering an initial interval with weakly decreasing multiplicities.

Original entry on oeis.org

1, 1, 4, 11, 37, 101, 328, 909, 2801

Offset: 0

Gus Wiseman, Sep 09 2022

A multiset is gapless if it covers an interval of positive integers. For example, {2,3,3,4} is gapless but {1,1,3,3} is not.

			The a(1) = 1 through a(3) = 11 multiset partitions:
  {{1}}  {{1,1}}    {{1,1,1}}
         {{1,2}}    {{1,1,2}}
         {{1},{1}}  {{1,2,3}}
         {{1},{2}}  {{1},{1,1}}
                    {{1},{1,2}}
                    {{1},{2,3}}
                    {{2},{1,1}}
                    {{3},{1,2}}
                    {{1},{1},{1}}
                    {{1},{1},{2}}
                    {{1},{2},{3}}

Gus Wiseman, Counting and ranking classes of multiset partitions related to gapless multisets

A000041 counts integer partitions, strict A000009.
A000670 counts patterns, ranked by A333217, necklace A019536.
A011782 counts multisets covering an initial interval.
Gapless multisets are counted by A034296, ranked by A073491.
Other conditions: A035310, A063834, A330783, A356934, A356938, A356954.
Other types: A356233, A356941, A356942, A356944.
Cf. A055887, A072233, A270995, A304969, A349050, A349055.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
mps[set_]:=Union[Sort[Sort/@(#/.x_Integer:>set[[x]])]&/@sps[Range[Length[set]]]];
strnorm[n_]:=Flatten[MapIndexed[Table[#2,{#1}]&,#]]&/@IntegerPartitions[n];
nogapQ[m_]:=Or[m=={},Union[m]==Range[Min[m],Max[m]]];
Table[Length[Select[Join@@mps/@strnorm[n],And@@nogapQ/@#&]],{n,0,5}]

A356955 MM-numbers of multisets of multisets, each covering an initial interval. Products of primes indexed by elements of A055932.

Original entry on oeis.org

1, 2, 3, 4, 6, 7, 8, 9, 12, 13, 14, 16, 18, 19, 21, 24, 26, 27, 28, 32, 36, 37, 38, 39, 42, 48, 49, 52, 53, 54, 56, 57, 61, 63, 64, 72, 74, 76, 78, 81, 84, 89, 91, 96, 98, 104, 106, 108, 111, 112, 113, 114, 117, 122, 126, 128, 131, 133, 144, 147, 148, 151, 152

Offset: 1

Gus Wiseman, Sep 12 2022

nonn

An initial interval is a set {1,2,...,n}  for some n >= 0.
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.
We define the multiset of multisets with MM-number n to be formed by taking the multiset of prime indices of each part of the multiset of prime indices of n. The size of this multiset of multisets is A302242(n). For example, the prime indices of 78 are {1,2,6}, so the multiset of multisets with MM-number 78 is {{},{1},{1,2}}.

			The initial terms and corresponding multisets of multisets:
   1: {}
   2: {{}}
   3: {{1}}
   4: {{},{}}
   6: {{},{1}}
   7: {{1,1}}
   8: {{},{},{}}
   9: {{1},{1}}
  12: {{},{},{1}}
  13: {{1,2}}
  14: {{},{1,1}}
  16: {{},{},{},{}}
  18: {{},{1},{1}}
  19: {{1,1,1}}
  21: {{1},{1,1}}
  24: {{},{},{},{1}}
  26: {{},{1,2}}
  27: {{1},{1},{1}}
  28: {{},{},{1,1}}
  32: {{},{},{},{},{}}

Gus Wiseman, Counting and ranking classes of multiset partitions related to gapless multisets

Multisets covering an initial interval are ctd by A011782, rkd by A055932.
This is the initial version of A356944.
Other types: A034691, A089259, A356945, A356954.
Other conditions: A302478, A302492, A356930, A356935, A356939, A356940.
A000041 counts integer partitions, strict A000009.
A000670 counts patterns, ranked by A333217, necklace A019536.
A000688 counts factorizations into prime powers.
A001055 counts factorizations.
A001221 counts prime divisors, sum A001414.
A001222 counts prime factors with multiplicity.
A056239 adds up prime indices, row sums of A112798.
Cf. A000040, A000720, A003963, A055887, A076610, A270995, A302242, A304969, A349050, A349055.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
normQ[m_]:=Or[m=={},Union[m]==Range[Max[m]]];
Select[Range[100],And@@normQ/@primeMS/@primeMS[#]&]

cp's OEIS Frontend

A356935 Numbers whose prime indices all have odd bigomega (number of prime factors with multiplicity). Products of primes indexed by elements of A026424. MM-numbers of finite multisets of finite odd-length multisets of positive integers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A356939 MM-numbers of multisets of intervals. Products of primes indexed by members of A073485.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A356941 Number of multiset partitions of integer partitions of n such that all blocks are gapless.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A356942 Number of multisets of gapless multisets whose multiset union is a size-n multiset covering an initial interval.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Extensions

A356930 Numbers whose prime indices have all odd prime indices. MM-numbers of finite multisets of finite multisets of odd numbers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A356940 MM-numbers of multisets of initial intervals. Products of elements of A062447 (primes indexed by primorials A002110).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A356943 Number of multiset partitions into gapless blocks of a size-n multiset covering an initial interval with weakly decreasing multiplicities.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A356955 MM-numbers of multisets of multisets, each covering an initial interval. Products of primes indexed by elements of A055932.

Views

Author

Keywords