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

 

标志
提示
(来自的问候整数序列在线百科全书!)
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
链接
阿洛伊斯·海因茨,n=1..1000时的n,a(n)表(克拉克·金伯利(Clark Kimberling)的前400条条款)
例子
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)):
seq(a(n),n=1..30)#阿洛伊斯·海因茨2014年10月16日
数学
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]
m=6;表[t[m,n],{n,1,z}](*A248824号*)
交叉参考
关键词
非n,容易的
作者
克拉克·金伯利2014年10月15日
状态
经核准的

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

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

最后修改时间:美国东部时间2024年5月1日17:11。包含372175个序列。(在oeis4上运行。)