搜索: 编号:181853
|
|
A181853号
|
| 按行读取的三角形:T(n,k)=c(n,k)}lcm(c)中的Sum_{c,其中c(n、k)是{1,2,…,n}的所有k-子集的集合。 |
|
+0 5
|
|
|
1, 1, 1, 1, 3, 2, 1, 6, 11, 6, 1, 10, 31, 34, 12, 1, 15, 81, 189, 182, 60, 1, 21, 141, 393, 494, 282, 60, 1, 28, 288, 1380, 3245, 3740, 2034, 420, 1, 36, 456, 2716, 8293, 13268, 11338, 4908, 840, 1, 45, 726, 5578, 22207, 47351, 57598, 40602, 15564, 2520
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
0,5
|
|
评论
|
|
|
链接
|
|
|
例子
|
[0] 1
[1] 1 1
[2] 1 3 2
[3] 1 6 11 6
[4] 1 10 31 34 12
[5] 1 15 81 189 182 60
[6] 1 21 141 393 494 282 60
|
|
MAPLE公司
|
使用(combstruct):
a181853_row:=进程(n)局部k,L,L,R,comb;
R:=空;
对于k从0到n do
L:=0;
梳:=iterstructs(组合(n),大小=k):
未完成时(梳子)做
l:=nextstruct(梳);
L:=L+ilcm(op(L));
od;
R:=R,L;
od;
R端:
#第二个Maple项目:
b: =proc(n,k)选项记忆`如果`(k=0,[1],
[`if`(k<n,b(n-1,k),[])[],seq(ilcm(c,n),c=b(n-1,k-1))
结束时间:
T: =(n,k)->添加(c,c=b(n,k)):
seq(seq(T(n,k),k=0..n),n=0..10)#阿洛伊斯·海因茨2013年7月29日
#第三个Maple项目:
b: =proc(n,m)选项记忆;展开(‘if’(n=0,
b(n-1,ilcm(m,n))*x+b(n-1,m))
结束时间:
T: =n->(p->seq(系数(p,x,i),i=0..n))(b(n,1)):
|
|
数学
|
t[_,0]=1;t[n_,k_]:=和[LCM@@c,{c,子集[Range[n],{k}]}];表[t[n,k],{n,0,8},{k,0,n}]//展平(*Jean-François Alcover公司2013年7月29日*)
|
|
黄体脂酮素
|
(圣人)#(以阿洛伊斯·海因茨(Alois P.Heinz)命名)
@缓存函数
定义b(n,k):
如果k==0:返回[1]
w=b(n-1,k),如果k<n else[0]
返回w+[b(n-1,k-1)中c的lcm(c,n)]
def T(n,k):返回加法(b(n,k))
压扁([[T(n,k)for k in(0..n)]for n in(0..10)])
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.005秒内完成
|