登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: a238607-编号:a238670
显示找到的2个结果中的1-2个。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
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
链接
乔瓦尼·雷斯塔,n=1..1000时的n,a(n)表
Giulio Ruzza和Di Yang,关于量子KdV体系的光谱问题,arXiv:2104.01480[math-ph],2021。
例子
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日*)
交叉参考
囊性纤维变性。A238640型,A238742型.
关键字
非n,容易的
作者
克拉克·金伯利2014年3月4日
状态
经核准的
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
链接
乔瓦尼·雷斯塔,n=1..1000时的n,a(n)表
例子
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日*)
交叉参考
囊性纤维变性。A238640型,A238741型.
关键字
非n,容易的
作者
克拉克·金伯利2014年3月4日
状态
经核准的
第页1

搜索在0.006秒内完成

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

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

上次修改时间:美国东部夏令时2024年5月8日03:37。包含372317个序列。(在oeis4上运行。)