搜索: a238607-编号:a238670
|
|
A238641型
|
| 2n-1的分区数p,使得n-(p的部分数)是p的一部分。 |
|
+10个 三
|
|
|
0, 0, 1, 4, 9, 21, 37, 69, 113, 187, 286, 449, 657, 976, 1397, 2003, 2788, 3902, 5323, 7284, 9789, 13144, 17405, 23052, 30142, 39379, 50967, 65842, 84368, 107954, 137126, 173893
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
链接
|
|
|
例子
|
a(4)计算7:52、511、421、331的这些分区。
|
|
数学
|
z=30;g[n_]:=整数分区[n];m[p_,t_]:=成员Q[p,t];
表[计数[g[2n],p_/;m[p,n-长度[p]],{n,z}](*238607元*)
表[计数[g[2n-1],p_/;m[p,n-长度[p]],{n,z}](*A238641型*)
表[计数[g[2 n+1],p_/;m[p,n-长度[p]],{n,z}](*A238742型*)
p[n_,k_]:=p[n,k]=如果[k==1|n==k,1,如果[k>n,0,p[n-1,k-1]+p[n-k,k]];q[n_,k_,e_]:=q[n,k,e]=如果[n-e<k-1,0,如果[k==1,如果[n==e,1,0],p[n-e,k-1]];a[n]:=和[q[2*n-1,u,n-u],{u,n-1}];数组[a,100](*乔瓦尼·雷斯塔2014年3月9日*)
|
|
交叉参考
|
|
|
关键字
|
非n,容易的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|
|
238742英镑
|
| 2n+1的分区数p,使得n-(p的部分数)是p的一部分。 |
|
+10个 三
|
|
|
0, 0, 1, 5, 13, 31, 59, 109, 180, 301, 461, 712, 1051, 1547, 2200, 3138, 4349, 6036, 8211, 11146, 14901, 19908, 26232, 34513, 44953, 58412, 75244, 96752, 123448, 157201, 198931, 251155
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,4
|
|
链接
|
|
|
例子
|
a(4)计算这些分区的9:72、711、621、531、441。
|
|
数学
|
z=30;g[n_]:=整数分区[n];m[p_,t_]:=成员Q[p,t];
表[计数[g[2n],p_/;m[p,n-长度[p]],{n,z}](*238607元*)
表[计数[g[2n-1],p_/;m[p,n-长度[p]],{n,z}](*A238641型*)
表[计数[g[2 n+1],p_/;m[p,n-长度[p]],{n,z}](*A238742型*)
p[n_,k]:=p[n,k]=如果[k==1||n==k,1,如果[k>n,0,p[n-1,k-1]+p[n-k,k]]];q[n_,k_,e_]:=q[n,k,e]=如果[n-e<k-1,0,如果[k==1,如果[n==e,1,0],p[n-e,k-1]];a[n]:=和[q[2*n+1,u,n-u],{u,n-1}];数组[a,100](*乔瓦尼·雷斯塔2014年3月12日*)
|
|
交叉参考
|
|
|
关键字
|
非n,容易的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.006秒内完成
|