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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A035470型 将{1,2,3,…n}分解为具有相等和的集合的方法的数目。 51
1, 1, 2, 2, 2, 2, 6, 12, 11, 2, 80, 166, 2, 665, 2918, 3309, 9296, 23730, 31875, 301030, 422897, 2, 13716867, 71504980, 100664385, 54148591, 880696662, 498017759, 27450476787, 111911522819, 179459955554, 2144502175214, 59115423983, 45837019664552, 375743493787258, 816118711787493, 2, 9492169507922 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
a(n)=2<=>{dn*(n+1)/2:d>=n}=2-阿洛伊斯·海因茨2009年9月3日
链接
例子
a(7)=6,因为我们有1234567、16/25/34/7、167/2345、257/1346、347/1256、356/1247。
发件人古斯·怀斯曼2019年7月13日:(开始)
a(6)=2到a(9)=11组具有相等块数的分区:
{123456} {1234567} {12345678} {123456789}
{16}{25}{34} {1247}{356} {12348}{567} {12345}{69}{78}
{1256}{347} {12357}{468} {1239}{456}{78}
{1346}{257} {12456}{378} {1248}{357}{69}
{167}{2345} {1278}{3456} {1257}{348}{69}
{16}{25}{34}{7} {1368}{2457} {1347}{258}{69}
{1458}{2367} {1356}{249}{78}
{1467}{2358} {159}{2346}{78}
{1236}{48}{57} {159}{267}{348}
{138}{246}{57} {168}{249}{357}
{156}{237}{48}{18}{27}{36}{45}{9}
{18}{27}{36}{45}
(结束)
MAPLE公司
with(numtheory):b:=proc()选项记住;局部i,j,t`如果`(args[1]=0,`if`(nargs=2,1,b(args[t]$t=2..nargs)),则添加(`if'(args[j]-args[nargs]<0,0,b(sort([seq(args[2]-`if`)(i=j,args[nargs],0),i=1..nargs-1)])[],args[nargs]-1)),j=1..nargs-1))结束:a:=proc(n)local i,m,x;m: =n*(n+1)/2;1+添加(b(i$(m/i),n)/(m/i!,i=[选择(x->x>=n,除数(m)减去{m})[]])结束:seq(a(n),n=1..25)#阿洛伊斯·海因茨2009年9月3日
数学
b[args_List]:=b[args]=如果[args[[1]]==0,如果[Length[args]==2,1,b[Rest[args]]],总和[If[args[[j]]-args[[-1]]<0,0,b[Sort[Join[Table[args[[i]]-如果[i=j,args[-1]],0],{i,1,Length[args]-1}]],{args[-1]],长度[args]-1}]];b[a1_List,a2_List]:=b[加入[a1,a2];
a[n_]:=a[n]=与[{m=n*(n+1)/2},1+Sum[b[Append[Array[i&,m/i],n]]/(m/i)!,{i,选择[Divisors[m]~补码~{m},#>=n&]}]];
表[打印[“a(”,n,“)=”,a[n]];a[n],{n,1,25}](*Jean-François Alcover公司2017年3月22日之后阿洛伊斯·海因茨*)
sps[{}]:={{}};sps[set:{i_,___}]:=联接@@函数[s,前缀[#,s]和/@sps[Complement[set,s]]/@Cases[子集[set],{i,___}];
表[长度[Select[sps[Range[n]],SameQ@@Total/@#&]],{n,0,10}](*古斯·怀斯曼2019年7月13日*)
交叉参考
囊性纤维变性。A164977号,A164978号. -阿洛伊斯·海因茨2009年9月3日
的行总和1975年2月14日.
关键词
非n
作者
扩展
更多术语来自约翰·莱曼2002年3月18日
a(19)-a(33)来自阿洛伊斯·海因茨2009年9月3日
a(34)来自阿洛伊斯·海因茨2015年5月24日
a(35)-a(38)来自马克斯·阿列克塞耶夫2024年2月15日
状态
经核准的

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

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

最后修改时间:美国东部时间2024年4月20日05:04。包含371798个序列。(在oeis4上运行。)