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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A327553型 两个分区都严格的n个两倍分区中的分区数。 4
0, 1, 1, 4, 6, 11, 20, 33, 57, 100, 165, 254, 417, 649, 1039, 1648, 2540, 3836, 6020, 9035, 13645, 20752, 31054, 45993, 68668, 101511, 149525, 220132, 321614, 468031, 684124, 989703, 1427054, 2064859, 2964987, 4254028, 6090453, 8686574, 12366583, 17598885 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,4
链接
阿洛伊斯·海因茨,n=0..5000时的n、a(n)表
例子
a(3)=4=1+1+2,对3,21,2|1中的分区进行计数。
MAPLE公司
g: =proc(n)选项记忆`如果`(n=0,1,加上(g(n-j)*add(
`如果`(d::奇数,d,0),d=numtheory[除数](j)),j=1..n)/n)
结束时间:
b: =proc(n,i)选项记忆`如果`(i*(i+1)/2<n,0,
`如果`(n=0,[1,0],b(n,i-1)+(p->p+[0,p[1])(
g(i)*b(n-i,最小值(n-i、i-1)))
结束时间:
a: =n->b(n$2)[2]:
seq(a(n),n=0..42);
数学
g[n_]:=g[n]=如果[n==0,1,和[g[n-j]和[If[OddQ[d],d,0],{d,除数[j]}],{j,1,n}]/n];
b[n_,i_]:=b[n,i]=如果[i(i+1;
a[n]:=b[n,n][[2];
a/@范围[0,42](*Jean-François Alcover公司2020年12月18日之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A000009号,A279785型,A327605型
关键词
非n
作者
阿洛伊斯·海因茨2019年9月16日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月26日10:40。包含371994个序列。(在oeis4上运行。)