|
|
A248824号 |
| 除以1的整数k^6的数目*2!*3!*...*不!。 |
|
1
|
|
|
1, 1, 1, 1, 2, 3, 6, 8, 18, 42, 64, 200, 432, 546, 960, 3888, 6000, 15180, 29952, 38976, 67200, 285600, 393984, 1632960, 3175200, 4165392, 6105600, 38413440, 55339200, 114048000, 205632000, 280219500, 448156800, 2621445120, 3777725952, 12940849152
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,5
|
|
链接
|
|
|
例子
|
a(7)计算这些整数k^6除以125411328000=A000178号(6) :1,64,729,4096,46656,2985984,这些是k^6表示k=1,2,3,4,6,12。
|
|
MAPLE公司
|
b: =proc(n)选项记住;添加(i[2]*x^numtheory[pi](i[1]),
i=ifactors(n)[2])+`if`(n=1,0,b(n-1))
结束时间:
c: =proc(n)选项记忆;b(n)+`if`(n=1,0,c(n-1))结束:
a: =n->(p->mul(iquo(系数(p,x,i),6)+1,i=1..度(p)))(c(n)):
|
|
数学
|
z=40;p[n_]:=乘积[k!,{k,1,n}];
f[n_]:=f[n]=系数整数[p[n]];
r[m_,x_]:=r[m,x]=m*楼层[x/m]
u[n_]:=表[f[n][[i,1]],{i,1,长度[f[n]}];
v[n_]:=表[f[n][[i,2]],{i,1,长度[f[n]]}];
t[m_,n_]:=应用[次数,1+r[m,v[n]]/m]
|
|
交叉参考
|
|
|
关键词
|
非n,容易的
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|