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

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: 编号:181853
显示1-1个结果(共1个)。 第页1
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
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
评论
C(n,k)也称为n与大小k的组合(参见A181842号).
主对角线给出:A003418号。下对角线给出:A094308号列k=1给出:A000217号. -阿洛伊斯·海因茨2013年7月29日
链接
阿洛伊斯·海因茨,第n行=0..46行,扁平
例子
[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)):
seq(T(n),n=0..10)#阿洛伊斯·海因茨2023年9月5日
数学
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)])
#彼得·卢什尼2013年7月29日
交叉参考
行总和给出A226037型.
囊性纤维变性。A065567号,A096179号,A181854号.
关键词
非n,
作者
彼得·卢什尼2010年12月6日
状态
经核准的
第页1

搜索在0.005秒内完成

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

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

上次修改时间:美国东部夏令时2024年4月19日02:25。包含371782个序列。(在oeis4上运行。)