cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-3 of 3 results.

A321468 Number of factorizations of n! into factors > 1 that can be obtained by taking the multiset union of a choice of factorizations of each positive integer from 2 to n into factors > 1.

Original entry on oeis.org

1, 1, 1, 1, 2, 2, 4, 4, 10, 20, 40, 40, 116, 116, 232, 464, 1440, 1440, 4192, 4192, 11640, 23280, 46560, 46560, 157376
Offset: 0

Views

Author

Gus Wiseman, Nov 11 2018

Keywords

Comments

a(n) is the number of factorizations finer than (2*3*...*n) in the poset of factorizations of n! into factors > 1, ordered by refinement.

Examples

			The a(2) = 1 through a(8) = 10 factorizations:
2  2*3  2*3*4    2*3*4*5    2*3*4*5*6      2*3*4*5*6*7      2*3*4*5*6*7*8
        2*2*2*3  2*2*2*3*5  2*2*2*3*5*6    2*2*2*3*5*6*7    2*2*2*3*5*6*7*8
                            2*2*3*3*4*5    2*2*3*3*4*5*7    2*2*3*3*4*5*7*8
                            2*2*2*2*3*3*5  2*2*2*2*3*3*5*7  2*2*3*4*4*5*6*7
                                                            2*2*2*2*3*3*5*7*8
                                                            2*2*2*2*3*4*5*6*7
                                                            2*2*2*3*3*4*4*5*7
                                                            2*2*2*2*2*2*3*5*6*7
                                                            2*2*2*2*2*3*3*4*5*7
                                                            2*2*2*2*2*2*2*3*3*5*7
For example, 2*2*2*2*2*2*3*5*6*7 = (2)*(3)*(2*2)*(5)*(6)*(7)*(2*2*2), so (2*2*2*2*2*2*3*5*6*7) is counted under a(8).
		

Crossrefs

Programs

  • Mathematica
    facs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}]];
    Table[Length[Union[Sort/@Join@@@Tuples[facs/@Range[2,n]]]],{n,10}]

A321467 Number of factorizations of n! into factors > 1 that can be obtained by taking the block-products of some set partition of {2,3,...,n}.

Original entry on oeis.org

1, 1, 1, 2, 5, 15, 47, 183, 719, 3329, 14990, 83798, 393864, 2518898
Offset: 0

Views

Author

Gus Wiseman, Nov 11 2018

Keywords

Comments

a(n) is the number of factorizations coarser than (2*3*...*n) in the poset of factorizations of n! into factors > 1, ordered by refinement.

Examples

			The a(1) = 1 through a(5) = 15 factorizations:
  ()  (2)  (6)    (24)     (120)
           (2*3)  (3*8)    (2*60)
                  (4*6)    (3*40)
                  (2*12)   (4*30)
                  (2*3*4)  (5*24)
                           (6*20)
                           (8*15)
                           (10*12)
                           (3*5*8)
                           (4*5*6)
                           (2*3*20)
                           (2*4*15)
                           (2*5*12)
                           (3*4*10)
                           (2*3*4*5)
For example, 10*12 = (2*5)*(3*4), so (10*12) is counted under a(5).
		

Crossrefs

Programs

  • Mathematica
    sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
    Table[Length[Union[Sort/@Apply[Times,sps[Range[2,n]],{2}]]],{n,10}]

A322260 Numbers k such that the poset of multiset partitions of a multiset whose multiplicities are the prime indices of k is a lattice.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 16, 32
Offset: 1

Views

Author

Gus Wiseman, Dec 05 2018

Keywords

Comments

This multiset (row k of A305936) is generally not the same as the multiset of prime indices of k. 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}.

References

  • R. P Stanley, Enumerative Combinatorics Vol. 1, Sec. 3.3.

Crossrefs

Showing 1-3 of 3 results.