#来自在线整数序列百科全书的问候!http://oeis.org/; 搜索:id:a171967 展示1-1的1个1 ;%I a171967;%S a171967 0,1,1,2,2,2,2,5,5,5,10,12,20,25,37,37,49,68,68,901191191582062693444444656565722,;%电话a171967 908114814814814917917952229527676536464204516464646315711571717938011406,;%U A171967171717938011406,;%U a171967 137931669220093242032901232424242424123474724524949494949494949494949636590597027983341,98822 %N A171967具有不同奇偶部分数的N的分区数。 %C A171967 a(N)=A000041(N)-A045931(N)=A108949(N)+A108950(N)。 %C A171967A(N)=和{k<>0}A240009(N,k)。-2014年3月30日, %H A171967 Alois P.Heinz,n=0..3500时的n,a(n)表%p A171967 b:=proc(n,i,t)选项记住;`如果`(n=0, %p A171967 `如果(t<>0,1,0,0),`如果(i<1,0,0,b(n,i-1,1,t)+;%p A171967“if `(i>n,0,b(n-i,i,i,t+(2*irem(i,2,2)-1(1(1)))) %p A171967结束: %p A171967终点: %p A171967 a:=n->b(n$2,0):(n->b(n$2,0):(n$2,0):(i>n i>n(n i %p A171967序列(a(n),n=0..80);#u Alois p.Heinz_2014年3月30日 %t A171967$递归限制=1000;b[n_,t_9]:=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,2]-1]]]]];a[n n n[U]:=b[n,n,0,0];表[a[n],{n,0,80}](*[[金弗朗索瓦弗朗索瓦Alcover 2011年6月30日,2015年6月30日,经过AloisP.Heinz*));%Y A171967 A13071967 Cf.A1307880,A171966.A171966.\1.A171966.A1307880,A171966.。。。。。%K A171967无,2010年1月21日 #内容根据OEIS最终用户许可协议提供:http://OEIS.org/License