A117433 -id:A117433 - cp's OEIS frontend

A053529 a(n) = n! * number of partitions of n.

1, 1, 4, 18, 120, 840, 7920, 75600, 887040, 10886400, 152409600, 2235340800, 36883123200, 628929100800, 11769069312000, 230150688768000, 4833164464128000, 105639166144512000, 2464913876705280000, 59606099200327680000, 1525429559126753280000, 40464026199993876480000

Offset: 0

N. J. A. Sloane, Jan 16 2000

Commuting permutations: number of ordered pairs (g, h) in Sym(n) such that gh = hg.
Equivalently sum of the order of all normalizers of all cyclic subgroups of Sym(n). - Olivier Gérard, Apr 04 2012
From Gus Wiseman, Jan 16 2019: (Start)
Also the number of Young tableaux with distinct entries from 1 to n, where a Young tableau is an array obtained by replacing the dots in the Ferrers diagram of an integer partition of n with positive integers. For example, the a(3) = 18 tableaux are:
  123  213  132  312  231  321
.
  12   21   13   31   23   32
  3    3    2    2    1    1
.
  1  2  1  3  2  3
  2  1  3  1  3  2
  3  3  2  2  1  1
(End)

R. P. Stanley, Enumerative Combinatorics, Cambridge, Vol. 2, 1999; see Problem 5.12, solution.

T. D. Noe, Table of n, a(n) for n = 0..200
M. Holloway, M. Shattuck, Commuting pairs of functions on a finite set, PU.M.A, Volume 24 (2013), Issue No. 1.
M. Holloway, M. Shattuck, Commuting pairs of functions on a finite set, Research Gate, 2015.
R. P. Stanley, Pairs with equal squares, Problem 10654, Amer. Math. Monthly, 107 (April 2000), solution p. 368.
Wikipedia, Young tableau

Column k=2 of A362827.
Cf. A000041, A072169, A061256.
Sequences counting pairs of functions from an n-set to itself: A053529, A181162, A239749-A239785, A239836-A239841.
Cf. A000085, A117433, A153452, A296188, A323295, A323434, A323436.

a:= func< n | NumberOfPartitions(n)*Factorial(n) >; [ a(n) : n in [0..25]]; // Vincenzo Librandi, Jan 17 2019

seq(count(Permutation(n))*count(Partition(n)),n=1..20); # Zerinvary Lajos, Oct 16 2006
with(combinat): A053529 := proc(n): n! * numbpart(n) end: seq(A053529(n), n=0..20); # Johannes W. Meijer, Jul 28 2016

Table[PartitionsP[n] n!, {n, 0, 20}] (* T. D. Noe, Jun 19 2012 *)

N=66; x='x+O('x^N); Vec(serlaplace(exp(sum(k=1, N, x^k/(1-x^k)/k)))) \\ Joerg Arndt, Apr 16 2010

N=66; x='x+O('x^N); Vec(serlaplace(sum(n=0, N, x^n/prod(k=1,n,1-x^k)))) \\ Joerg Arndt, Jan 29 2011

a(n) = n!*numbpart(n); \\ Michel Marcus, Jul 28 2016

from math import factorial
from sympy import npartitions
def A053529(n): return factorial(n)*npartitions(n) # Chai Wah Wu, Jul 10 2023

E.g.f: Sum_{n>=0} x^n/(Product_{k=1..n} 1-x^k) = exp(Sum_{n>=1} (x^n/n)/(1-x^n)). - Joerg Arndt, Jan 29 2011
a(n) = Sum{k=1..n} (((n-1)!/(n-k)!)*sigma(k)*a(n-k)), n > 0, and a(0)=1. See A274760. - Johannes W. Meijer, Jul 28 2016
a(n) ~ sqrt(Pi/6)*exp(sqrt(2/3)*Pi*sqrt(n))*n^n/(2*exp(n)*sqrt(n)). - Ilya Gutkovskiy, Jul 28 2016

A000293 a(n) = number of solid (i.e., three-dimensional) partitions of n.

Original entry on oeis.org

1, 1, 4, 10, 26, 59, 140, 307, 684, 1464, 3122, 6500, 13426, 27248, 54804, 108802, 214071, 416849, 805124, 1541637, 2930329, 5528733, 10362312, 19295226, 35713454, 65715094, 120256653, 218893580, 396418699, 714399381, 1281403841, 2287986987, 4067428375, 7200210523, 12693890803, 22290727268, 38993410516, 67959010130, 118016656268, 204233654229, 352245710866, 605538866862, 1037668522922, 1772700955975, 3019333854177, 5127694484375, 8683676638832, 14665233966068, 24700752691832, 41495176877972, 69531305679518

Offset: 0

N. J. A. Sloane

An ordinary partition is a row of numbers in nondecreasing order whose sum is n. Here the numbers are in a three-dimensional pile, nondecreasing in the x-, y- and z-directions.
Finding a g.f. for this sequence is an unsolved problem. At first it was thought that it was given by A000294.
Equals A000041 convolved with A002836: [1, 0, 2, 5, 12, 24, 56, 113, ...] and row sums of the convolution triangle A161564. - Gary W. Adamson, Jun 13 2009

			Examples for n=2 and n=3.
a(2) = 4: 2; 11 where the first 1 is at the origin and the second 1 is in the x, y or z direction.
a(3) = 10: 3; 21 where the 2 is at the origin and the 1 is on the x, y or z axis; 111 (a row of 3 ones on the x, y or z axes); and three 1's with one 1 at the origin and the other two 1's on two of the three axes.
From _Gus Wiseman_, Jan 22 2019: (Start)
The a(1) = 1 through a(4) = 26 solid partitions, represented as chains of chains of integer partitions:
  ((1))  ((2))       ((3))            ((4))
         ((11))      ((21))           ((22))
         ((1)(1))    ((111))          ((31))
         ((1))((1))  ((2)(1))         ((211))
                     ((11)(1))        ((1111))
                     ((2))((1))       ((2)(2))
                     ((1)(1)(1))      ((3)(1))
                     ((11))((1))      ((21)(1))
                     ((1)(1))((1))    ((11)(11))
                     ((1))((1))((1))  ((111)(1))
                                      ((2))((2))
                                      ((3))((1))
                                      ((2)(1)(1))
                                      ((21))((1))
                                      ((11))((11))
                                      ((11)(1)(1))
                                      ((111))((1))
                                      ((2)(1))((1))
                                      ((1)(1)(1)(1))
                                      ((11)(1))((1))
                                      ((2))((1))((1))
                                      ((1)(1))((1)(1))
                                      ((1)(1)(1))((1))
                                      ((11))((1))((1))
                                      ((1)(1))((1))((1))
                                      ((1))((1))((1))((1))
(End)

P. A. MacMahon, Memoir on the theory of partitions of numbers - Part VI, Phil. Trans. Roal Soc., 211 (1912), 345-373.
P. A. MacMahon, Combinatory Analysis. Cambridge Univ. Press, London and New York, Vol. 1, 1915 and Vol. 2, 1916; see vol. 2, p 332.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Suresh Govindarajan, Table of n, a(n) for n = 0..72
Alimzhan Amanov and Damir Yeliussizov, MacMahon's statistics on higher-dimensional partitions, arXiv:2009.00592 [math.CO], 2020. Mentions this sequence.
A. O. L. Atkin, P. Bratley, I. G. McDonald and J. K. S. McKay, Some computations for m-dimensional partitions, Proc. Camb. Phil. Soc., 63 (1967), 1097-1100. [Annotated scanned copy], DOI
Srivatsan Balakrishnan, Suresh Govindarajan and Naveen S. Prabhakar, On the asymptotics of higher-dimensional partitions, arXiv:1105.6231 [cond-mat.stat-mech], 2011.
P. Bratley and J. K. S. McKay, Algorithm 313: Multi-dimensional partition generator, Comm. ACM, 10 (Issue 10, 1967), p. 666.
Nicolas Destainville and Suresh Govindarajan, Estimating the asymptotics of solid partitions, arXiv:1406.5605 [cond-mat.stat-mech], 2014; J. Stat. Phys. 158 (2015) 950-967.
Suresh Govindarajan, Solid Partitions Project Dec 14, 2010.
D. E. Knuth, A Note on Solid Partitions, Math. Comp. 24, 955-961, 1970.
P. A. MacMahon, Combinatory analysis.
Ville Mustonen and R. Rajesh, Numerical Estimation of the Asymptotic Behaviour of Solid Partitions of an Integer, arXiv:cond-mat/0303607 [cond-mat.stat-mech], 2003; J. Phys. A 36 (2003), no. 24, 6651-6659.
S. P. Naveen, On The Asymptotics of Some Counting Problems in Physics, Thesis, Bachelor of Technology, Department of Physics, Indian Institute of Technology, Madras, May 2011.
Eric Weisstein's World of Mathematics, Solid Partition
Wikipedia, Solid partition
Damir Yeliussizov, Bounds on the number of higher-dimensional partitions, arXiv:2302.04799 [math.CO], 2023.

Cf. A000041, A000219 (2-dim), A000294, A000334 (4-dim), A000390 (5-dim), A002835, A002836, A005980, A037452 (inverse Euler trans.), A080207, A007326, A000416 (6-dim), A000427 (7-dim), A179855 (8-dim).
Cf. A161564. - Gary W. Adamson, Jun 13 2009
Cf. A001970, A002974, A003293, A007713, A114736, A117433, A323657.

planePtns[n_]:=Join@@Table[Select[Tuples[IntegerPartitions/@ptn],And@@(GreaterEqual@@@Transpose[PadRight[#]])&],{ptn,IntegerPartitions[n]}];
solidPtns[n_]:=Join@@Table[Select[Tuples[planePtns/@y],And@@(GreaterEqual@@@Transpose[Join@@@(PadRight[#,{n,n}]&/@#)])&],{y,IntegerPartitions[n]}];
Table[Length[solidPtns[n]],{n,10}] (* Gus Wiseman, Jan 23 2019 *)

More terms from the Mustonen and Rajesh article, May 02 2003
a(51)-a(62) found by Suresh Govindarajan and students, Dec 14 2010
a(63)-a(68) found by Suresh Govindarajan and students, Jun 01 2011
a(69)-a(72) found by Suresh Govindarajan and Srivatsan Balakrishnan, Jan 03 2013

A114736 Number of planar partitions of n where parts strictly decrease along each row and column.

Original entry on oeis.org

1, 1, 1, 3, 4, 6, 10, 15, 22, 33, 49, 70, 102, 146, 205, 290, 405, 561, 779, 1071, 1463, 1999, 2714, 3667, 4946, 6641, 8880, 11848, 15753, 20870, 27586, 36354, 47766, 62621, 81878, 106785, 138975, 180449, 233778, 302270, 390027, 502256, 645603, 828330, 1060851

Offset: 0

Franklin T. Adams-Watters, Mar 16 2006

nonn

If these partitions are "flattened" into a simple partition, the resulting partitions are those for which any part size present with multiplicity k implies the presence of at least k(k-1)/2 larger parts. E.g., [3,1|1] flattens to [3,1^2], 1 has multiplicity 2, so there must be at least 2*1/2 = 1 part larger than 1 - which is the 3.

			For n = 5, we have the 6 partitions [5], [4,1], [4|1], [3,2], [3|2] and [3,1|1].
From _Gus Wiseman_, Nov 15 2018: (Start)
The a(6) = 10 plane partitions:
  6   5 1   4 2   3 2 1
.
  5   4 1   4   3 2   3 1
  1   1     2   1     2
.
  3
  2
  1
(End)

B. Gordon, Multirowed partitions with strict decrease along columns (Notes on plane partitions IV.), Symposia Amer. Math. Soc. 19 (1971) 91-100.

Alois P. Heinz, Table of n, a(n) for n = 0..85

Cf. A000009, A000219, A001970, A007716, A068313, A117433, A120733, A319646, A321645, A321652, A321653, A321655.

prs2mat[prs_]:=Table[Count[prs,{i,j}],{i,Union[First/@prs]},{j,Union[Last/@prs]}];
multsubs[set_,k_]:=If[k==0,{{}},Join@@Table[Prepend[#,set[[i]]]&/@multsubs[Drop[set,i-1],k-1],{i,Length[set]}]];
Table[Length[Select[multsubs[Tuples[Range[n],2],n],And[Union[First/@#]==Range[Max@@First/@#],Union[Last/@#]==Range[Max@@Last/@#],And@@(OrderedQ[#,Greater]&/@prs2mat[#]),And@@(OrderedQ[#,Greater]&/@Transpose[prs2mat[#]])]&]],{n,5}] (* Gus Wiseman, Nov 15 2018 *)

Clarified definition, added 30 terms and reference. - Dennis K Moore, Jan 12 2011

a(40)-a(44) from Alois P. Heinz, Sep 26 2018

A323429 Number of rectangular plane partitions of n.

Original entry on oeis.org

1, 1, 3, 5, 10, 14, 26, 35, 58, 81, 124, 169, 257, 345, 501, 684, 968, 1304, 1830, 2452, 3387, 4541, 6188, 8257, 11193, 14865, 19968, 26481, 35341, 46674, 62007, 81611, 107860, 141602, 186292, 243800, 319610, 416984, 544601, 708690, 922472, 1197018, 1553442

Offset: 0

Gus Wiseman, Jan 15 2019

nonn

Number of ways to fill a (not necessarily square) matrix with the parts of an integer partition of n so that the rows and columns are weakly decreasing.

			The a(5) = 14 matrices:
  [5] [4 1] [3 2] [3 1 1] [2 2 1] [2 1 1 1] [1 1 1 1 1]
.
  [4] [3] [2 1]
  [1] [2] [1 1]
.
  [3] [2]
  [1] [2]
  [1] [1]
.
  [2]
  [1]
  [1]
  [1]
.
  [1]
  [1]
  [1]
  [1]
  [1]

Cf. A000219, A003293, A047966, A101509, A114736, A117433, A299968, A319066.

Cf. A323301, A323307, A323430, A323431, A323432, A323435, A323436, A323438.

Table[Sum[Length[Select[Union[Sort/@Tuples[IntegerPartitions[#,{k}]&/@ptn]],And@@OrderedQ/@Transpose[#]&]],{ptn,IntegerPartitions[n]},{k,Min[ptn]}],{n,30}]

A323436 Number of plane partitions whose parts are the prime indices of n.

Original entry on oeis.org

1, 1, 1, 1, 2, 1, 2, 1, 3, 2, 2, 1, 3, 1, 2, 2, 5, 1, 4, 1, 3, 2, 2, 1, 5, 2, 2, 3, 3, 1, 4, 1, 7, 2, 2, 2, 8, 1, 2, 2, 5, 1, 4, 1, 3, 3, 2, 1, 7, 2, 4, 2, 3, 1, 7, 2, 5, 2, 2, 1, 8, 1, 2, 3, 11, 2, 4, 1, 3, 2, 4, 1, 12, 1, 2, 4, 3, 2, 4, 1, 7, 5, 2, 1, 8, 2, 2

Offset: 0

Gus Wiseman, Jan 15 2019

nonn

Number of ways to fill a Young diagram with the prime indices of n such that all rows and columns are weakly decreasing.

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.

			The a(120) = 12 plane partitions:
  32111
.
  311   321   3111   3211
  21    11    2      1
.
  31   32   311   321
  21   11   2     1
  1    1    1     1
.
  31   32
  2    1
  1    1
  1    1
.
  3
  2
  1
  1
  1

Cf. A000085, A000219, A003293, A056239, A112798, A114736, A117433, A138178, A296188, A299968.

Cf. A323300, A323429, A323437, A323438, A323439.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
facs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}]];
ptnplane[n_]:=Union[Map[Reverse@*primeMS,Join@@Permutations/@facs[n],{2}]];
Table[Length[Select[ptnplane[y],And[And@@GreaterEqual@@@#,And@@(GreaterEqual@@@Transpose[PadRight[#]])]&]],{y,100}]

A068313 Number of (0,1)-matrices with sum of entries equal to n and no zero rows or columns, with weakly decreasing row sums and column sums.

Original entry on oeis.org

1, 4, 15, 82, 457, 3231, 24055, 209375, 1955288, 20455936, 229830841, 2828166755, 37228913365, 528635368980, 7990596990430, 128909374528433, 2202090635802581, 39837079499488151, 759320365206705013, 15234890522990662422, 320634889654149218205, 7068984425261215971205

Offset: 1

Axel Kohnert (axel.kohnert(AT)uni-bayreuth.de), Feb 25 2002

nonn

This is the sum over the matrix of base change from the elementary symmetric functions to the monomial symmetric functions.

			a(2) = 4 because there are 4 different 0-1 matrices of weight 2: 1 10 01 11,1, 01, 10.
From _Gus Wiseman_, Nov 15 2018: (Start)
The a(3) = 15 matrices:
  [1 1 1]
.
  [1 1] [1 1 0] [1 0 1] [0 1 1]
  [1 0] [0 0 1] [0 1 0] [1 0 0]
.
  [1] [1 0] [1 0] [1 0 0] [1 0 0] [0 1] [0 1 0] [0 1 0] [0 0 1] [0 0 1]
  [1] [1 0] [0 1] [0 1 0] [0 0 1] [1 0] [1 0 0] [0 0 1] [1 0 0] [0 1 0]
  [1] [0 1] [1 0] [0 0 1] [0 1 0] [1 0] [0 0 1] [1 0 0] [0 1 0] [1 0 0]
(End)

I. G. Macdonald, Symmetric Functions and Hall Polynomials, Oxford 1979, p. 57.

Ludovic Schwob, Table of n, a(n) for n = 1..37
Ludovic Schwob, On the enumeration of double cosets and self-inverse double cosets, arXiv:2506.04007 [math.CO], 2025. See p. 14.

Cf. A000219, A001970, A007716, A049311, A101370, A117433, A120733, A321646, A321652, A321653, A321654.

prs2mat[prs_]:=Table[Count[prs,{i,j}],{i,Union[First/@prs]},{j,Union[Last/@prs]}];
Table[Length[Select[Subsets[Tuples[Range[n],2],{n}],And[Union[First/@#]==Range[Max@@First/@#],Union[Last/@#]==Range[Max@@Last/@#],OrderedQ[Total/@prs2mat[#]],OrderedQ[Total/@T[prs2mat[#]]]]&]],{n,5}] (* Gus Wiseman, Nov 15 2018 *)

Name changed by Gus Wiseman, Nov 15 2018

a(20) onwards from Ludovic Schwob, Oct 13 2023

A323438 Number of ways to fill a Young diagram with the prime indices of n such that all rows and columns are weakly increasing.

Original entry on oeis.org

1, 1, 1, 2, 1, 2, 1, 3, 2, 2, 1, 4, 1, 2, 2, 5, 1, 3, 1, 4, 2, 2, 1, 7, 2, 2, 3, 4, 1, 4, 1, 7, 2, 2, 2, 8, 1, 2, 2, 7, 1, 4, 1, 4, 4, 2, 1, 12, 2, 3, 2, 4, 1, 5, 2, 7, 2, 2, 1, 10, 1, 2, 4, 11, 2, 4, 1, 4, 2, 4, 1, 13, 1, 2, 3, 4, 2, 4, 1, 12, 5, 2, 1, 10, 2

Offset: 1

Gus Wiseman, Jan 16 2019

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.

			The a(96) = 19 tableaux:
  111112
.
  111   1111   1112   11111   11112
  112   12     11     2       1
.
  11   111   111   112   1111   1112
  11   11    12    11    1      1
  12   2     1     1     2      1
.
  11   11   111   112
  11   12   1     1
  1    1    1     1
  2    1    2     1
.
  11   12
  1    1
  1    1
  1    1
  2    1
.
  1
  1
  1
  1
  1
  2

Wikipedia, Young tableau

Cf. A000085, A000219, A003293, A056239, A112798, A114736, A117433, A138178, A299968, A323300, A323430, A323436, A323438, A323450.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
facs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}]];
ptnplane[n_]:=Union[Map[primeMS,Join@@Permutations/@facs[n],{2}]];
Table[Length[Select[ptnplane[y],And[And@@LessEqual@@@#,And@@(LessEqual@@@Transpose[PadRight[#]/.(0->Infinity)])]&]],{y,100}]

Sum_{A056239(n) = k} a(k) = A323450(n).

A321653 Number of nonnegative integer matrices with sum of entries equal to n and no zero rows or columns, with strictly decreasing row sums and column sums.

Original entry on oeis.org

1, 1, 1, 5, 5, 14, 44, 72, 147, 381, 1405

Offset: 0

Gus Wiseman, Nov 15 2018

			The a(5) = 14 matrices:
  [5] [4 1] [3 2]
.
  [4] [4 0] [3 1] [3 1] [3] [3 0] [3 0] [2 2] [2 1] [2 1] [1 2]
  [1] [0 1] [1 0] [0 1] [2] [1 1] [0 2] [1 0] [2 0] [1 1] [2 0]

Cf. A000219, A001970, A007716, A068313, A114736, A117433, A120733, A319646, A321645, A321652, A321654, A321655.

prs2mat[prs_]:=Table[Count[prs,{i,j}],{i,Union[First/@prs]},{j,Union[Last/@prs]}];
multsubs[set_,k_]:=If[k==0,{{}},Join@@Table[Prepend[#,set[[i]]]&/@multsubs[Drop[set,i-1],k-1],{i,Length[set]}]];
Table[Length[Select[multsubs[Tuples[Range[n],2],n],And[Union[First/@#]==Range[Max@@First/@#],Union[Last/@#]==Range[Max@@Last/@#],OrderedQ[Total/@prs2mat[#],Greater],OrderedQ[Total/@Transpose[prs2mat[#]],Greater]]&]],{n,6}]

A321655 Number of distinct row/column permutations of strict plane partitions of n.

Original entry on oeis.org

1, 1, 1, 5, 5, 9, 29, 33, 53, 77, 225

Offset: 0

Gus Wiseman, Nov 15 2018

			The a(6) = 9 permutations of strict plane partitions:
  [6] [2 4] [4 2] [1 5] [5 1] [1 2 3] [1 3 2] [2 1 3] [2 3 1] [3 1 2] [3 2 1]
.
  [1] [5] [0 1] [1 0] [2 3] [3 2] [2] [4] [0 2] [1 3] [2 0] [3 1]
  [5] [1] [2 3] [3 2] [0 1] [1 0] [4] [2] [1 3] [0 2] [3 1] [2 0]
.
  [1] [1] [2] [2] [3] [3]
  [2] [3] [1] [3] [1] [2]
  [3] [2] [3] [1] [2] [1]

Cf. A000219, A001970, A007716, A008480, A068313, A114736, A117433, A120733, A321645, A319646, A321647, A321648.

submultisetQ[M_,N_]:=Or[Length[M]==0,MatchQ[{Sort[List@@M],Sort[List@@N]},{{x_,Z___},{_,x_,W___}}/;submultisetQ[{Z},{W}]]];
multsubs[set_,k_]:=If[k==0,{{}},Join@@Table[Prepend[#,set[[i]]]&/@multsubs[Drop[set,i-1],k-1],{i,Length[set]}]];
Table[Length[Select[multsubs[Tuples[Range[n],2],n],And[Union[First/@#]==Range[Max@@First/@#],Union[Last/@#]==Range[Max@@Last/@#],UnsameQ@@Length/@Split[#],OrderedQ[Sort[Map[Last,GatherBy[Sort[Reverse/@#],First],{2}],submultisetQ],submultisetQ],OrderedQ[Sort[Sort/@Map[Last,GatherBy[#,First],{2}],submultisetQ],submultisetQ]]&]],{n,5}]

A323430 Number of rectangular plane partitions of n with strictly decreasing rows and columns.

Original entry on oeis.org

1, 1, 1, 3, 3, 5, 7, 9, 12, 16, 22, 27, 36, 44, 57, 72, 89, 110, 139, 170, 210, 261, 318, 390, 478, 581, 705, 860, 1036, 1252, 1511, 1816, 2178, 2618, 3127, 3743, 4471, 5330, 6347, 7564, 8984, 10674, 12669, 15016, 17780, 21050, 24868, 29371, 34655, 40836, 48080

Offset: 0

Gus Wiseman, Jan 15 2019

nonn

Number of ways to fill a (not necessarily square) matrix with the parts of an integer partition of n so that the rows and columns are strictly decreasing.

			The a(8) = 12 matrices:
  [8] [7 1] [6 2] [5 3] [5 2 1] [4 3 1]
.
  [7] [6] [5] [3 2]
  [1] [2] [3] [2 1]
.
  [5] [4]
  [2] [3]
  [1] [1]
The a(10) = 22 matrices:
  [10] [9 1] [8 2] [7 3] [7 2 1] [6 4] [6 3 1] [5 4 1] [5 3 2] [4 3 2 1]
.
  [9] [8] [7] [6] [5 2] [4 2] [4 3]
  [1] [2] [3] [4] [2 1] [3 1] [2 1]
.
  [7] [6] [5] [5]
  [2] [3] [4] [3]
  [1] [1] [1] [2]
.
  [4]
  [3]
  [2]
  [1]

Cf. A000219, A003293, A047966, A101509, A114736, A117433, A299968, A319066.

Cf. A323301, A323307, A323429, A323431, A323432, A323435, A323436, A323438.

Table[Sum[Length[Select[Union[Tuples[Select[IntegerPartitions[#,{k}],UnsameQ@@#&]&/@ptn]],And@@(OrderedQ[#,Greater]&/@Transpose[#])&]],{ptn,IntegerPartitions[n]},{k,Min[ptn]}],{n,30}]

cp's OEIS Frontend

A053529 a(n) = n! * number of partitions of n.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Magma

Maple

Mathematica

PARI

PARI

PARI

Python

Formula

A000293 a(n) = number of solid (i.e., three-dimensional) partitions of n.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Mathematica

Extensions

A114736 Number of planar partitions of n where parts strictly decrease along each row and column.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Mathematica

Extensions

A323429 Number of rectangular plane partitions of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A323436 Number of plane partitions whose parts are the prime indices of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A068313 Number of (0,1)-matrices with sum of entries equal to n and no zero rows or columns, with weakly decreasing row sums and column sums.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Mathematica

Extensions

A323438 Number of ways to fill a Young diagram with the prime indices of n such that all rows and columns are weakly increasing.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs