登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志

请做一个捐赠让OEIS继续运行。我们现在已经56岁了。在过去的一年里,我们增加了10000个新序列,达到了近9000个引用(通常说“感谢OEI的发现”)。
其他方式捐赠

提示
(问候来自整数序列在线百科全书!)
A108950号 奇数部分大于n个偶数部分的分区。 8

%我

%第1,1,2,3,4,7,9,14,18,27,35,49,64,86113148192247319404517649节,

%电话:822102412851590197924363007368245155501670381319851,

%U 1189914344172522070324804264035377421155008559415704208326198365115947136557

%奇数部分多于偶数部分的N的划分数。

%C a(n)=A130780(n)-A045931(n)=A171967(n)-A108949(n)。-2010年1月21日,Reinhard Zumkeller

%cA(n)=和{k=1..n}A240009(n,k)。-阿洛伊斯·P·海因茨,2014年3月30日

%H Alois P.Heinz,<a href=“/A108950/b108950.txt”>n=1..500的n,a(n)表</a>

%F G.F.:和{k>=0}x^k*(1-x^(2*k))/乘积{i=1..k}(1-x^(2*i))^2。-2007年8月19日

%e a(4)=3:{[3,1],[2,1,1],[1,1,1]};a(5)=4:{[5],[3,1,1],[2,1,1,1],[1,1,1,1]}。

%p with(combinat,partition):oddbigrevn:=proc(n::nonnegint)local evencount,oddcount,bigcount,parts,i,j;printlevel:=-1;bigcount:=0;partitions:=partition(n);对于从1到nops(partitions[i])的j,do if(op(j,partitions[i])mod 2<>0),则oddcount:=oddcount+1 fi;如果(j,partitions[i])mod 2=0)则evencount:=evencount+1 fi-od;如果(evencount<oddcount),则bigcount:=bigcount+1 fi-od;printlevel:=1;return(bigcount)end proc;seq(oddbigrevn(i),i=1..42);

%第二个枫树计划:

%p b:=proc(n,i,t)选项记住;`if`(n=0,

%p`if`(t>0,1,0),`if`(i<1,0,b(n,i-1,t)+

%p`if`(i>n,0,b(n-i,i,t+(2*irem(i,2)-1)))))

%p端:

%p a:=n->b(n$2,0):

%p序列(a(n),n=1..80);#u Alois p.Heinz_2014年3月30日

%t p[n#]:=p[n]=选择[整数分位数[n],计数[#,\u?OddQ]>计数?EvenQ]&];t=Table[p[n],{n,0,15}](*n的分区,具有#奇数部分>#偶数部分*)

%t表格格式[t](*分区,垂直格式*)

%t表[长度[p[n]],{n,1,30}](*A108950*)

%t(*彼得J.C.摩西,2014年3月10日*)

%[[[n]本[n[n]u,i[i,t]=如果[n==0,如果[t>0,1,0,0],如果[i<1,0,0,b[n,i-1,t]+如果[i>n,0,b[n,i-1,t]+如果[i>n,0,b[n-i,i,t+(2*Mod[i,2][1]]]];a[n[n]:=b[n,n,0];表[a[n],{n,1,1,80}]([[[[2015年11月16日]2015年11月16日,让金[弗朗索瓦]为我们的Alcover[2015年11月16日,2015年11月16日,15 15 15 15在海因茨之后)

%Y参考A045931表示偶数部分=奇数部分,A108949表示偶数部分>奇数部分。

%参见A171966、A171967。-2010年1月21日

%不知道

%O 1,3号

%阿伦·斯迈利,2005年7月21日

%更多条款请参考2012年10月4日的乔格·阿恩特

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

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

上次修改日期:美国东部时间2020年12月2日01:48。包含338864个序列。(运行在oeis4上。)