登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志


提示
问候整数序列的在线百科全书!)
A061199 右上三角由列读取,其中T(n,k),k=n,是k的分区数,其中没有一部分出现多于n次;k的分区,其中没有部分是(n+1)的倍数。
1, 0, 1、0, 1, 2、0, 2, 2、3, 0, 2、4, 4, 5、0, 3, 5、6, 6, 7、0, 4, 7、9, 10, 10、11, 0, 5、9, 12, 13、14, 14, 15、14, 14, 15、y、y、y、y、y、y、y、y、y、y、y、y、y、y、γ、γ 列表图表参考文献历史文本内部格式
抵消

0. 6

链接

Alois P. Heinz柱K=0…140,扁平化

例子

T(2,4)=4,因为4的可能分区位于第一定义(无项大于两次)1+1+2, 2+2, 1+3,或4,在第二定义(没有术语3的倍数)1+1+1+1+++++〉,或γ。

三角T(n,k)开始:

1, 0, 0,0, 0, 0,0, 0, 0,0,…

1, 1, 2,2, 3, 4,5, 6, 8,…

2, 2, 4,5, 7, 9,13, 16,…

3, 4, 6,9, 12, 16,22,…

5, 6, 10,13, 19, 25,…

7, 10, 14,20, 27,…

11, 14, 21,28,…

15, 21, 29,…

22, 29,…

30,…

枫树

B: = PROC(n,i,k)选项记住;

‘如果’(n=0, 1,‘i'’(i<1, 0);

加法(b(n i*j,i-1,k),j=0…min(n/i,k)))

结束:

t=(n,k)-> b(k $ 2,n):

SEQ(SET(t(n,k),n=0…k),k=0…12);阿洛伊斯·P·海因茨11月27日2013

Mathematica

B[n],i],k]:=[n,i,k]=[n]=0, 1,如果[i<1, 0,求和[b[n- i*j,i-1,k],{j,0,min [n/i,k] }] ];t[n],k[n],[b],[表[t[n,k],{n,0,k}],{k,0, 12 } //平坦(*)让弗兰1月28日2015后阿洛伊斯·P·海因茨*)

交叉裁判

行有效地包括A000 0 07A000 00 09A000 0726A00 1935A035959. 主对角线是A000 000 41.A061198是相同的表,但包括N> K的情况。

t(n,2×n)给出:A22623.

语境中的顺序:A101276 A1038 63 A166395*A309107 A144171 A103615

相邻序列:A061196 A061197 A061198*A061200 A06120 A06120

关键词

诺恩塔布

作者

亨利贝托姆利4月20日2001

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改11月15日04:16 EST 2019。包含329144个序列。(在OEIS4上运行)