搜索： a238641-id:a238641
|
| |
|
|
A238607型
|
| 2n的分区数p，使得n-（p的部分数）是p的一部分。 |
|
+10个
三
|
|
|
|
0, 0, 1, 4, 12, 24, 49, 85, 147, 232, 374, 558, 843, 1223, 1774, 2493, 3519, 4835, 6659, 8999, 12144, 16152, 21479, 28186, 36945, 47959, 62126, 79805, 102352, 130286, 165546, 209070, 263461, 330266, 413207, 514486, 639342, 791261, 977301, 1202636, 1477172
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
偏移
|
1,4
|
|
|
链接
|
|
|
|
例子
|
a（4）将这些分区计算为8:62、611、521、431。
|
|
|
数学
|
z=30；g[n_]：=整数分区[n]；m[p_，t_]：=成员Q[p，t]；
表[计数[g[2n]，p_/；m[p，n-长度[p]]，{n，z}](*A238607型*)
表[计数[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_]：=如果[n-e<k-1，0，如果[k==1，如果[n==e，1，0]，p[n-e，k-1]]；a[n]：=和[q[2*n，u，n-u]，{u，n-1}]；数组[a，100](*乔瓦尼·雷斯塔2014年3月7日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A238742型
|
| 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}](*A238607型*)
表[计数[g[2n-1]，p_/；m[p，n-长度[p]]，{n，z}](*A238641型*)
表[计数[g[2 n+1]，p_/；m[p，n-长度[p]]，{n，z}](*238742英镑*)
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.004秒内完成
|
