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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A239241型 将n划分为不同部分的数量,其中(奇数部分的数量)=(偶数部分的数目)。 45
1, 0, 0, 1, 0, 2, 0, 3, 0, 4, 1, 5, 2, 6, 5, 7, 8, 8, 14, 9, 20, 11, 30, 13, 40, 17, 55, 23, 70, 32, 91, 45, 112, 65, 140, 91, 169, 128, 206, 177, 245, 241, 295, 323, 350, 429, 419, 559, 499, 722, 600, 921, 721, 1162, 874, 1452, 1062, 1800, 1299, 2210 (列表图表参考历史文本内部格式)
抵消
0,6
评论
a(n)=A240021型(n,0)-阿洛伊斯·海因茨2014年4月2日
链接
阿洛伊斯·海因茨,n=0..1000时的n,a(n)表
配方奶粉
a(n)+A239239号(n)+A239242号(n)=A000009号(n) 对于n>=1。
a(n)=[x^ny^0]产品{i>=1}1+x^i*y^(2*(i模2)-1)-阿洛伊斯·海因茨2014年4月3日
例子
a(9)=4计算这些分区:81、72、63、54。
MAPLE公司
b: =proc(n,i,t)选项记忆`如果`(n>i*(i+1)/2,0,
`if`(n=0,`if`(t=0,1,0),b(n,i-1,t)+` if`(i>n,0,
b(n-i,i-1,t+`if`(irem(i,2)=1,1,-1)))
结束时间:
a: =n->b(n$2,0):
seq(a(n),n=0..60)#阿洛伊斯·海因茨2014年3月15日
数学
z=55;p[n_]:=p[n]=整数分区[n];d[u_]:=d[u]=删除重复项[u];g[u_]:=g[u]=长度[u];
表[g[Select[p[n],d[#]==#&],计数[#,_?OddQ]<计数[#、_?EvenQ]&]],{n,0,z}](*A239239号*)
表[g[Select[p[n],d[#]==#&],计数[#,_?OddQ]<=计数[#、_?EvenQ]&]],{n,0,z}](*A239240型*)
表[g[Select[Select[p[n],d[#]=#&],计数[#,_?奇数Q]==计数[#,_?偶数Q]&]],{n,0,z}](*A239241型*)
表[g[Select[p[n],d[#]=#&],计数[#,_?OddQ]>计数[#、_?EvenQ]&]],{n,0,z}](*A239242号*)
表[g[Select[p[n],d[#]==#&],计数[#,_?OddQ]>=Count[#,_EvenQ]&]],{n,0,z}](*A239243型*)
(*彼得·J·C·摩西2014年3月10日*)
b[n_,i_,t_]:=b[n,i,t]=如果[n>i*(i+1)/2,0,If[n==0,如果[t==0、1、0],b[n、i-1、t]+如果[i>n,0,b[n-i,i-1,t+If[Mod[i,2]==1、1、-1]]];a[n]:=b[n,n,0];表[a[n],{n,0,60}](*Jean-François Alcover公司2015年12月27日,之后阿洛伊斯·海因茨*)
交叉参考
关键词
非n,容易的
作者
克拉克·金伯利2014年3月13日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月19日09:23。包含371782个序列。(在oeis4上运行。)