|
|
A322390型 |
| 顶点连通性为1的n整数分区数。 |
|
13
|
|
|
0, 1, 1, 2, 1, 3, 1, 4, 2, 5, 1, 8, 1, 7, 3, 11, 1, 14, 2, 18, 7, 21, 6, 35, 14, 43, 28, 65, 42, 96, 70, 141, 120, 205, 187, 315, 286, 445, 445, 657
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
评论
|
整数分区的顶点连通性是必须被除掉的素数的最小数目(然后去掉任何部分等于1),以便其余部分的素数因式分解形成一个断开(或空)的超图。
|
|
链接
|
|
|
例子
|
a(14)=7个整数分区是(842)、(8222)、(77)、(4442)、(422222)和(222222)。
a(18)=14个整数分区:
(9,9), (16,2),
(8,8,2), (10,6,2),
(8,4,4,2), (9,3,3,3),
(4,4,4,4,2), (8,4,2,2,2),
(3,3,3,3,3,3), (4,4,4,2,2,2), (8,2,2,2,2,2),
(4,4,2,2,2,2,2),
(4,2,2,2,2,2,2,2),
(2,2,2,2,2,2,2,2,2).
|
|
数学
|
素数MS[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];
csm[s_]:=使用[{c=Select[Tuples[Range[Length[s]],2],And[OrderedQ[#],UnsameQ@@#,Length[Intersection@@s[[#]]>0]&]},如果[c=={},s,csm[Sort[Append[Delete[s,List/@c[[1]]],Union@@s[[c[1]]]]];
vertConn[y_]:=如果[Length[csm[primeMS/@y]]=1,0,Min@@Length/@Select[Subsets[Union@@primeMS/@y],Function[del,Length[csm[DeleteCase[DeleteCaes[primeMS@@y,Alternatives@@del,{2}],{}]]=1]]];
表[Length[Select[Integer Partitions[n],vertConn[#]==1&]],{n,20}]
|
|
交叉参考
|
囊性纤维变性。A013922号,A054921号,A095983号,A304714型,A304716型,A305078型,A305079型,A322335型,A322338型,A322387型,A322389型,A322391型.
|
|
关键词
|
非n,更多
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|