提出

经核准的

编辑

提出

A类 或者, 一 受限实体分区是一个由非负整数组成的无限三维数组，这些整数与n相加，使得所有一维截面严格递减，直到它们全部变为零-古斯·怀斯曼2019年1月22日

素数MS[n_]：=如果[n==1，{}，扁平[Cases[FactorInteger[n]，{p_，k_}:>表[PrimePi[p]，{k}]]]；

传真srcplptns公司[编号]：=如果[n个<=1,{{}},联接@@表[地图[前置[#,d日]&,选择[facs公司多元组[n个整数分区/d日@聚四氟乙烯],而且[而且@@(更大的相等@@@转座[PadRight（右垫）[#]],分钟),而且@@更大的@@@#,而且@@(更大的@@@删除案例[转座[PadRight（右垫）[#>=d日&]],0,{2}])]&],{d日,休息[约数聚四氟乙烯,整数分区[无]]}]];

ptn平面src固体[编号]：=工会加入@@表[选择[多元组[地图srcplptns公司/@年],而且[反向而且@@(更大的相等@@@*素数MS,转座[加入@@排列@(PadRight（右垫）[#,{n个,n个}]&/@facs公司#)]),而且@@(更大的@@@删除案例[转座[加入@@@(PadRight（右垫）[#,{n个,n个}]&/@#)],0,{2}])]&],{年,整数分区[n个]}];

srcplptns[n_]：=连接@@表[Select[ptnplane[Times@@Prime/@y]，And[And@@Greater@@#，And@@（GreaterEqual@@@Transpose[PadRight[#]]），And@（Greater@@@DeleteCases[Transpose[PadRight[#]]，0，{2}]）]&]，{y，Integer Partitions[n]}]；

表[Length[Join@@Table[Select[Tuples[srcplptns/@y]，And[And@@（GreaterEqual@@@Transpose[Join@@@（PadRight[#，{n，n}]&/@#）]），And@@（Greater@@@DeleteCases[Transpose[Join@@（PadRight[#，}]&@@#）]，0，{2}]）]&]，{y，Integer Partitions[n]]，{n、10}](*古斯·怀斯曼2019年1月22日*）

表[长度[srcsolids[n]]，{n，10}](*古斯·怀斯曼2019年1月23日*）

a（1）=1到a（6）=20个受限实体分区, 代表 作为 链 属于 链 属于 整数 分区:

受限实心隔墙是一 一个 无限的 求和到n的非负整数的三维数组，使得所有一维部分严格递减，直到它们变为全零-古斯·怀斯曼2019年1月22日

受限制的实体分区是一个由非负整数组成的三维数组，这些整数与n相加，使得所有一维截面都严格递减，直到它们全部变为零-古斯·怀斯曼2019年1月22日

发件人古斯·怀斯曼2019年1月22日：（开始）

a（1）=1到a（6）=20个受限实体分区：

((1)) ((2)) ((3)) ((4)) ((5)) ((6))

((21)) ((31)) ((32)) ((42))

((2)(1)) ((3)(1)) ((41)) ((51))

((2))((1)) ((21)(1)) ((3)(2)) ((321))

((3))((1)) ((4)(1)) ((4)(2))

((21))((1)) ((31)(1)) ((5)(1))

((2)(1))((1)) ((3))((2)) ((31)(2))

((4))((1)) ((32)(1))

((31))((1)) ((41)(1))

((3)(1))((1)) ((4))((2))

((21)(1))((1)) ((5))((1))

((31))((2))

((3)(2)(1))

((32))((1))

((41))((1))

((3)(1))((2))

((3)(2))((1))

((4)(1))((1))

((31)(1))((1))

((3))((2))((1))

（结束）

素数MS[n_]：=如果[n==1，{}，扁平[Cases[FactorInteger[n]，{p_，k_}:>表[PrimePi[p]，{k}]]]；

facs[n_]：=如果[n<=1，{{}}，连接@@表[Map[Prepend[#，d]&，Select[facs[n/d]，Min@@#>=d&]]，{d，Rest[Divisors[n]]}]；

ptnplane[n_]：=并集[Map[Reverse@*primeMS，Join@@Permutations/@facs[n]，{2}]]；

srcplptns[n_]：=连接@@表[Select[ptnplane[Times@@Prime/@y]，And[And@@Greater@@#，And@@（GreaterEqual@@@Transpose[PadRight[#]]），And@（Greater@@@DeleteCases[Transpose[PadRight[#]]，0，{2}]）]&]，{y，Integer Partitions[n]}]；

表[Length[Join@@Table[Select[Tuples[srcplptns/@y]，And[And@@（GreaterEqual@@@Transpose[Join@@@（PadRight[#，{n，n}]&/@#）]），And@@（Greater@@@DeleteCases[Transpose[Join@@（PadRight[#，}]&@@#）]，0，{2}]）]&]，{y，Integer Partitions[n]]，{n、10}](*古斯·怀斯曼2019年1月22日*）

囊性纤维变性。A000219号,A000293号（实心隔板），A000334号,A001970号,A114736号（限制平面隔墙），A117433号（严格的平面分区），A321662型,A323657型（严格的实心隔墙）。

经核准的

编辑

提出

经核准的

编辑

提出

非n,更多,改变

H.Gupta，受限固体隔墙，J.Combina.Theory，A 13（1972），140-144。

H.古普塔，<a href=“http://dx.doi.org/10.1016/0097-3165（72）90018-0“>受限固体隔墙，J.Combina.Theory，a 13（1972），140-144。

提出

编辑