cp's OEIS Frontend

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

%I A114736 #23 Jan 12 2022 09:50:25
%S A114736 1,1,1,3,4,6,10,15,22,33,49,70,102,146,205,290,405,561,779,1071,1463,
%T A114736 1999,2714,3667,4946,6641,8880,11848,15753,20870,27586,36354,47766,
%U A114736 62621,81878,106785,138975,180449,233778,302270,390027,502256,645603,828330,1060851
%N A114736 Number of planar partitions of n where parts strictly decrease along each row and column.
%C A114736 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.
%D A114736 B. Gordon, Multirowed partitions with strict decrease along columns (Notes on plane partitions IV.), Symposia Amer. Math. Soc. 19 (1971) 91-100.
%H A114736 Alois P. Heinz, <a href="/A114736/b114736.txt">Table of n, a(n) for n = 0..85</a>
%e A114736 For n = 5, we have the 6 partitions [5], [4,1], [4|1], [3,2], [3|2] and [3,1|1].
%e A114736 From _Gus Wiseman_, Nov 15 2018: (Start)
%e A114736 The a(6) = 10 plane partitions:
%e A114736   6   5 1   4 2   3 2 1
%e A114736 .
%e A114736   5   4 1   4   3 2   3 1
%e A114736   1   1     2   1     2
%e A114736 .
%e A114736   3
%e A114736   2
%e A114736   1
%e A114736 (End)
%t A114736 prs2mat[prs_]:=Table[Count[prs,{i,j}],{i,Union[First/@prs]},{j,Union[Last/@prs]}];
%t A114736 multsubs[set_,k_]:=If[k==0,{{}},Join@@Table[Prepend[#,set[[i]]]&/@multsubs[Drop[set,i-1],k-1],{i,Length[set]}]];
%t A114736 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 *)
%Y A114736 Cf. A000009, A000219, A001970, A007716, A068313, A117433, A120733, A319646, A321645, A321652, A321653, A321655.
%K A114736 nonn
%O A114736 0,4
%A A114736 _Franklin T. Adams-Watters_, Mar 16 2006
%E A114736 Clarified definition, added 30 terms and reference. - _Dennis K Moore_, Jan 12 2011
%E A114736 a(40)-a(44) from _Alois P. Heinz_, Sep 26 2018