|
|
A321451型 |
| n的整数分区数,该整数分区不能划分为两个或多个具有相等和的块。 |
|
30
|
|
|
1, 1, 1, 2, 2, 6, 4, 14, 8, 20, 16, 55, 22, 100, 45, 108, 64, 296, 93, 489, 145, 447, 241, 1254, 284, 1692, 487, 1492, 627, 4564, 811, 6841, 1172, 4531, 1744, 12260, 1970, 21636, 3103, 12193, 3719, 44582, 4645, 63260, 6417, 29947, 8987, 124753, 9784, 162107, 14247
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,4
|
|
链接
|
|
|
公式
|
|
|
例子
|
a(1)=1到a(9)=20分区:
(1) (2) (3) (4) (5) (6) (7) (8) (9)
(21) (31) (32) (42) (43) (53) (54)
(41) (51) (52) (62) (63)
(221) (411) (61) (71) (72)
(311) (322) (332) (81)
(2111) (331) (521) (432)
(421) (611) (441)
(511) (5111) (522)
(2221) (531)
(3211) (621)
(4111) (711)
(22111) (3222)
(31111) (4221)
(211111) (4311)
(5211)
(6111)
(22221)
(42111)
(51111)
(411111)
将分区(2111)的所有多集分区划分为两个或多个块的完整列表是:(1)(112),(2)(111),(11)(12),(1)。所有这些都没有相等的区块集,因此(2111)被计入a(5)。
另一方面,分区(321)可以划分为((12)(3)),它具有两个或多个块和相等的块集,因此(321。
|
|
数学
|
hwt[n_]:=总[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]]}];
表[Length[Select[Integer Partitions[n],Length[Celect[facs[Times@@Prime/@#],SameQ@@hwt/@#&]]==1&]],{n,10}]
|
|
交叉参考
|
囊性纤维变性。A000041号,A265947型,A276024型,A279787型,A305551,A306017型,317141英镑,A320322型,A321452型,A321453型,A321454型,A321455型.
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|