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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A130780号 n的分区数,使得奇数部分的数量大于或等于偶数部分的数目。 39
1, 1, 1, 3, 3, 6, 8, 12, 16, 23, 32, 42, 58, 75, 102, 131, 173, 220, 288, 363, 466, 587, 743, 929, 1164, 1448, 1797, 2224, 2738, 3368, 4122, 5042, 6133, 7466, 9035, 10941, 13184, 15888, 19064, 22876, 27343 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,4
评论
a(n)=A108950号(n)+A045931号(n)=A000041号(n)-A108949号(n) ●●●●-莱因哈德·祖姆凯勒2010年1月21日
a(n)=和{k=0..n}A240009型(n,k)-阿洛伊斯·海因茨2014年3月30日
链接
阿洛伊斯·海因茨,n=0..1000时的n,a(n)表
配方奶粉
G.f.:求和{k>=0}x^k/产品{i=1..k}(1-x^(2*i))^2。
例子
a(5)=6,因为我们有5、41、32311211和11111(221不合格)。
MAPLE公司
g: =总和(x^k/(乘积((1-x^(2*i))^2,i=1..k)),k=0..50):gser:=系列(g,x=0,50):seq(系数(gser,x,n),n=1.40)#Emeric Deutsch公司2007年8月24日
#第二个Maple项目:
b: =proc(n,i,t)选项记忆`如果`(n=0,
`如果`(t>=0,1,0),`如果`(i<1,0,b(n,i-1,t)+
`如果`(i>n,0,b(n-i,i,t+(2*irem(i,2)-1)))
结束时间:
a: =n->b(n$2,0):
seq(a(n),n=0..80)#阿洛伊斯·海因茨2014年3月30日
数学
$RecursionLimit=1000;b[n,i_,t_]:=b[n,i,t]=如果[n==0,如果[t>=0,1,0],如果[i<1,0,b[n,i-1,t]+如果[i>n,0,b[n-i,i,t+(2*Mod[i,2]-1)]]];a[n]:=b[n,n,0];表[a[n],{n,0,80}](*Jean-François Alcover公司2015年5月12日,之后阿洛伊斯·海因茨*)
opgQ[n_]:=模块[{len=Length[n],op},op=Length[Select[n,OddQ]];op>=len-op];表[Count[Integer Partitions[n],_?(opgQ)],{n,0,50}](*哈维·P·戴尔2021年12月12日*)
交叉参考
囊性纤维变性。A045931号,A108949号,A108950号.
囊性纤维变性。A171966号,A171967号. -莱因哈德·祖姆凯勒2010年1月21日
关键字
容易的,非n
作者
扩展
来自的更多条款Emeric Deutsch公司2007年8月24日
状态
经核准的

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

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

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