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

 


2016年10月27日
将n划分为不同部分的分区数,其中部分数将n划分成不同部分。
82
1, 1, 1, 2, 1, 4, 1, 4, 4, 5, 1, 15, 1, 7, 14, 17, 1, 28, 1, 40, 28, 11, 1, 99, 31, 13, 49, 99, 1, 186, 1, 152, 76, 17, 208, 425, 1, 19, 109, 699, 1, 584, 1, 433, 823, 23, 1, 1625, 437, 1140, 193, 746, 1, 2003, 1748, 2749, 244, 29, 1, 7404, 1, 31, 4158, 3258, 3766, 6307, 1
抵消
1,4
链接
阿洛伊斯·海因茨,n=1..1000时的n,a(n)表
例子
发件人古斯·怀斯曼2019年9月24日:(开始)
a(1)=1到a(12)=15个严格整数分区,其平均值为整数(a=10,B=11,C=12):
(1) (2)(3)(4)(5)(6)(7)(8)(9)(A)(B)(C)
(31) (42) (53) (432) (64) (75)
(51) (62) (531) (73) (84)
(321) (71) (621) (82) (93)
(91)(A2)
(B1)
(543)
(642)
(651)
(732)
(741)
(831)
(921)
(5421)
(6321)
(结束)
MAPLE公司
a: =proc(m)选项记忆;局部b;b:=
proc(n,i,t)选项记忆`如果`(i*(i+1)/2<n,
0,`if`(n=0,`if`(irem(m,t)=0,1,0),
b(n,i-1,t)+b(n-i,min(n-i、i-1),t+1))
结束:`if`(i素数(m),1,b(m$2,0))
结束时间:
seq(a(n),n=1..100)#阿洛伊斯·海因茨2019年9月25日
数学
npdp[n_]:=计数[Select[Integer Partitions[n],Length[#]=长度[Union[#]]&],_?(可分割[n,长度[#]]&)];数组[npdp,70](*哈维·P·戴尔,2016年2月12日*)
a[m_]:=a[m]=模[{b},b[n_,i_,t_]:=b[n,i,t]=如果[i(i+1)/2<n,0,如果[n==0,如果[模[m,t]==0、1、0],b[n、i-1,t]+b[n-i,最小值[n-i、i-1],t+1]];如果[PrimeQ[m],1,b[m,m,0]];
数组[a,100](*Jean-François Alcover公司2021年5月21日之后阿洛伊斯·海因茨*)
交叉参考
这些分区的BI-编号由下式给出A326669型(二进制索引具有整数平均值的数字)。
非限制性案例是A067538号.
具有整数几何平均值的严格分区为A326625型.
其最大值除以其总和的严格分区A326850型.
关键词
容易的,非n
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月22日04:28。包含376096个序列。(在oeis4上运行。)