|
|
A101459号 |
| a(k)=卡片{i*j,i<=k,j<=lcm(1,2,3…,k)}。 |
|
三
|
|
|
1, 3, 12, 29, 176, 198, 1608, 3519, 11604, 12500, 152720, 160970, 2292000, 2417700, 2549904, 5336115, 97630080, 101271000, 2055670560, 2125864116, 2209916016, 2291367000, 55764302880, 57138304410, 297081542208
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
|
|
链接
|
|
|
例子
|
a(2)=3={i*j,i=1..2,j=1..2}={1,2,4}={2,4}
a(3)=12=#{1,2,3,4,5,6,2,4,6,8,10,12,3,6,9,12,15,18}=#{2,3,4],5,8,9,10,12,15,18}
|
|
MAPLE公司
|
p: =proc(n)选项记住;局部s,t,i,j:s:=1;t: ={}:
对于i从n-1乘以-1到1+n/(最小@操作@eval@numtheory[系数集])(n)do
t:=t联合{ilcm(n,i)/n};
t:=选择(x->numtheory[divisors](x)相交t={x},t):
对于组合[powerset](t)中的j,dos:=s+(-1)^nops(j)/ilcm(op(j))od:
od;序列号结束:
a: =k->ilcm($2..k)*加(p(n),n=1..k);
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|