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-5 of 5 results.

A300121 Number of normal generalized Young tableaux, of shape the integer partition with Heinz number n, with all rows and columns weakly increasing and all regions connected skew partitions.

Original entry on oeis.org

1, 1, 2, 2, 4, 5, 8, 4, 11, 12, 16, 12, 32, 28, 31, 8, 64, 31, 128, 33, 82, 64, 256, 28, 69, 144, 69, 86, 512, 105, 1024, 16, 208, 320, 209, 82, 2048, 704, 512, 86, 4096, 318, 8192, 216, 262, 1536, 16384, 64, 465, 262, 1232, 528, 32768, 209, 588, 245, 2912, 3328
Offset: 1

Views

Author

Gus Wiseman, Feb 25 2018

Keywords

Comments

The diagram of a connected skew partition is required to be connected as a polyomino but can have empty rows or columns. A generalized Young tableau of shape y is an array obtained by replacing the dots in the Ferrers diagram of y with positive integers. A tableau is normal if its entries span an initial interval of positive integers. The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k).

Examples

			The a(9) = 11 tableaux:
1 1
1 1
.
2 1   1 1   1 1   1 2
1 1   1 2   2 2   1 2
.
1 1   1 2   1 2   1 3
2 3   1 3   3 3   2 3
.
1 2   1 3
3 4   2 4
		

Crossrefs

Programs

  • Mathematica
    undcon[y_]:=Select[Tuples[Range[0,#]&/@y],Function[v,GreaterEqual@@v&&With[{r=Select[Range[Length[y]],y[[#]]=!=v[[#]]&]},Or[Length[r]<=1,And@@Table[v[[i]]Table[PrimePi[p],{k}]]]];
    Table[Length[cos[Reverse[primeMS[n]]]],{n,50}]

A300120 Number of skew partitions whose quotient diagram is connected and whose numerator has weight n.

Original entry on oeis.org

2, 6, 12, 26, 44, 86, 136, 239, 376, 613, 930, 1485, 2194, 3355, 4948, 7372, 10656, 15660, 22359, 32308
Offset: 1

Views

Author

Gus Wiseman, Feb 25 2018

Keywords

Comments

The diagram of a connected skew partition is required to be connected as a polyomino but can have empty rows or columns.

Examples

			The a(3) = 12 skew partitions:
(3)/()   (3)/(1)   (3)/(2)    (3)/(3)
(21)/()  (21)/(11) (21)/(2)   (21)/(21)
(111)/() (111)/(1) (111)/(11) (111)/(111)
		

Crossrefs

Programs

  • Mathematica
    undcon[y_]:=Select[Tuples[Range[0,#]&/@y],Function[v,GreaterEqual@@v&&With[{r=Select[Range[Length[y]],y[[#]]=!=v[[#]]&]},Or[Length[r]<=1,And@@Table[v[[i]]
    				

A300122 Number of normal generalized Young tableaux of size n with all rows and columns weakly increasing and all regions connected skew partitions.

Original entry on oeis.org

1, 4, 13, 51, 183, 771, 3087, 13601, 59933, 278797, 1311719, 6453606, 32179898, 166075956, 871713213, 4704669005, 25831172649, 145260890323
Offset: 1

Views

Author

Gus Wiseman, Feb 25 2018

Keywords

Comments

The diagram of a connected skew partition is required to be connected as a polyomino but can have empty rows or columns. A generalized Young tableau of shape y is an array obtained by replacing the dots in the Ferrers diagram of y with positive integers. A tableau is normal if its entries span an initial interval of positive integers.

Examples

			The a(3) = 13 tableaux:
1 1 1   1 1 2   1 2 2   1 2 3
.
1 1   1 1   1 2   1 2   1 3
1     2     1     3     2
.
1   1   1   1
1   1   2   2
1   2   2   3
		

Crossrefs

Programs

  • Mathematica
    undcon[y_]:=Select[Tuples[Range[0,#]&/@y],Function[v,GreaterEqual@@v&&With[{r=Select[Range[Length[y]],y[[#]]=!=v[[#]]&]},Or[Length[r]<=1,And@@Table[v[[i]]
    				

A300123 Number of ways to tile the diagram of the integer partition with Heinz number n using connected skew partitions.

Original entry on oeis.org

1, 1, 2, 2, 4, 4, 8, 4, 10, 8, 16, 8, 32, 16, 20, 8, 64, 20, 128, 16, 40, 32, 256, 16, 52, 64, 52, 32, 512, 40, 1024, 16, 80, 128, 104, 40, 2048, 256, 160, 32, 4096, 80, 8192, 64, 104, 512, 16384, 32, 272, 104
Offset: 1

Views

Author

Gus Wiseman, Feb 25 2018

Keywords

Comments

The diagram of a connected skew partition is required to be connected as a polyomino but can have empty rows or columns. The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k).

Crossrefs

A300118 Number of skew partitions whose quotient diagram is connected and whose numerator is the integer partition with Heinz number n.

Original entry on oeis.org

1, 2, 3, 3, 4, 4, 5, 4, 6, 5, 6, 5, 7, 6, 7, 5, 8, 7, 9, 6, 8, 7, 10, 6, 10, 8, 10, 7, 11, 8, 12, 6, 9, 9, 11, 8, 13, 10, 10, 7, 14, 9, 15, 8, 11, 11, 16, 7, 15, 11, 11, 9, 17, 11, 12, 8, 12, 12, 18, 9, 19, 13, 12, 7, 13, 10, 20, 10, 13, 12, 21, 9, 22, 14, 15, 11
Offset: 1

Views

Author

Gus Wiseman, Feb 25 2018

Keywords

Comments

The diagram of a connected skew partition is required to be connected as a polyomino but can have empty rows or columns.

Examples

			The a(15) = 7 denominators are (), (1), (11), (22), (3), (31), (32) with diagrams:
o o o   . o o   . o o   . . o   . . .   . . .   o o o
o o     o o     . o     . .     o o     . o     o o
Missing are the two disconnected skew partitions:
. . o   . . o
o o     . o
		

Crossrefs

Programs

  • Mathematica
    primeMS[n_]:=If[n===1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    undcon[y_]:=Select[Tuples[Range[0,#]&/@y],Function[v,GreaterEqual@@v&&With[{r=Select[Range[Length[y]],y[[#]]=!=v[[#]]&]},Or[Length[r]<=1,And@@Table[v[[i]]
    				
Showing 1-5 of 5 results.