|
|
A108950号 |
| n的奇数部分多于偶数部分的分区数。 |
|
12
|
|
|
1, 1, 2, 3, 4, 7, 9, 14, 18, 27, 35, 49, 64, 86, 113, 148, 192, 247, 319, 404, 517, 649, 822, 1024, 1285, 1590, 1979, 2436, 3007, 3682, 4515, 5501, 6703, 8131, 9851, 11899, 14344, 17252, 20703, 24804, 29640, 35377, 42115, 50085, 59415, 70420, 83261, 98365, 115947, 136557
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1、3
|
|
链接
|
B.Kim、E.Kim和J.Lovejoy,分区中的奇偶校验偏差《欧洲联合杂志》,第89卷(2020年),第103159页,第19页。
|
|
配方奶粉
|
G.f.:求和{k>=0}x ^k*(1-x^(2*k))/产品{i=1..k}(1-x*(2*i))^2-弗拉德塔·乔沃维奇2007年8月19日
通用公式:(乘积{k>=1}1/(1-x^(2*k-1)))*Sum_{n>=1}q^(2*n^2-n)*(1-q^)(2*n))/Product_{k=1..n}(1-qqu(2*k))^2-杰里米·洛夫乔伊2021年1月12日
|
|
例子
|
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]}。
|
|
MAPLE公司
|
with(combint,partition):oddbigrevn:=proc(n::nonnegint)局部evencount,oddcount,bigcount,parts,i,j;打印级别:=-1;大计数:=0;分区:=分区(n);对于从1到nops(分区)的i,执行偶数:=0;奇数:=0;对于从1到nops(分区[i])的j,如果(op(j,分区[i]mod 2<>0),则oddcount:=oddcount+1 fi;如果(op(j,partitions[i])mod 2=0),则evencount:=evencount+1 fiod;如果(evencount<oddcount),则bigcount:=bigcount+1 fiod;打印级别:=1;返回(bigcount)结束进程;seq(oddbigrevn(i),i=1..42);
#第二个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):
|
|
数学
|
p[n_]:=p[n]=选择[IntegerPartitions[n],计数[#,_?OddQ]>计数[#、_?EvenQ]&];t=表[p[n],{n,0,15}](*n的分区,带有#奇数部分>#偶数部分*)
TableForm[t](*分区,垂直格式*)
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,1,80}](*Jean-François Alcover公司2015年11月16日,之后阿洛伊斯·海因茨*)
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|