A326520-OEIS公司

登录

OEIS由OEIS基金会的许多慷慨捐赠者.

A326520型

权重为n的正常多集分区数，其中每个部分的平均值相同。

9

1, 1, 3, 7, 17, 35, 103, 197 (列表;图表;参考文献;听;历史;文本;内部格式)

	抵消	`0,3`
	评论	`如果一个多集划分覆盖了一个正整数的初始区间，那么它就是正规的。`
	链接	`n，a（n）的表（n=0..7）。` `古斯·怀斯曼，对部分长度、总和或平均值恒定或严格的多集分区进行计数和排序的序列。`
	例子	`a（0）=1到a（4）=17个正常多集分区，其中每个部分的平均值相同：` `{} {{1}} {{1,1}} {{1,1,1}} {{1,1,1,1}}` `{{1,2}} {{1,1,2}} {{1,1,1,2}}` `{{1},{1}} {{1,2,2}} {{1,1,2,2}}` `{{1,2,3}} {{1,1,2,3}}` `{{1},{1,1}} {{1,2,2,2}}` `{{2},{1,3}} {{1,2,2,3}}` `{{1},{1},{1}} {{1,2,3,3}}` `{{1,2,3,4}}` `{{1},{1,1,1}}` `{{1,1},{1,1}}` `{{1,2},{1,2}}` `{{1,3},{2,2}}` `{{1,4},{2,3}}` `{{2},{1,2,3}}` `{{1},{1},{1,1}}` `｛｛2｝、｛2｝、｛1,3｝` `{{1},{1},{1},{1}}`
	数学	`sps[｛｝]：=｛｛｝｝；sps[set:{i_，___}]：=联接@@函数[s，前缀[#，s]和/@sps[Complement[set，s]]/@Cases[子集[set]，{i，___}]；` `mps[set_]：=联合[Sort[Sort/@（#/.x_Integer:>set[[x]]）]&/@sps[Range[Length[set]]]；` `allnorm[n_]：=如果[n<=0，{{}}，函数[s，数组[Count[s，y_/；y<=#]+1&，n]]/@子集[Range[n-1]+1]]；` `表[Length[Select[Join@@mps/@allnormal[n]，SameQ@@Mean/@#&]]，{n，0，5}]`
	交叉参考	`参见。A038041号,A051293号,A255906型,A317583型,362512美元,A326515型,A326517型,A326518型,A326519型,A326521型,A326536飞机.` `上下文中的序列：A114100号 A260677型 A014395号A295146型 A014314号 A221792号` `相邻序列：A326517型 A326518型 A326519型A326521型 A326522型 A326523型`
	关键词	`非n,更多`
	作者	`古斯·怀斯曼2019年7月12日`
	状态	`已批准`

查找|欢迎光临|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索引擎|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：2024年4月28日05:00 EDT。包含372020个序列。（在oeis4上运行。）