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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A074064号 具有最大可能顺序的n阶排列的循环类型数。 7
1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 4, 1, 1, 1, 1, 2, 3, 1, 1, 2, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 1, 1, 1, 1, 1, 2, 4, 1, 1, 1, 1, 2, 3, 1, 1, 2, 3, 1, 1, 1, 1, 1, 1, 2, 3, 1, 1, 1, 2, 4 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,7
链接
阿洛伊斯·海因茨,n=0..180时的n,a(n)表
配方奶粉
和{i除展开式中的x^n系数A000793号(n) }亩(A000793号(n) /i)*1/Product_{j除以i}(1-x^j)。
例子
对于n=22,我们有4种这样的循环类型:[1,1,1,3,4,5,7],[1,2,3,4,5,7],[3],3,4,5,17],[4,5,6,7]。
MAPLE公司
A000793号:=proc(n)选项记忆;局部l、p、i;l:=1:p:=组合[分区](n):如果ilcm(p[i][j]$j=1..nops(p[i))>l,则l:=ilcm(p[i][j]$j=1..nops(p[i]));fi:od:返回(l);结束进程:
taylInv:=proc(i,n)局部结果,j,idiv,k;结果:=1;idiv:=数字[除数](i);对于k从1到nops(idiv),做j:=op(k,idiv);结果:=结果*泰勒(1/(1-x^j),x=0,n+1);结果:=转换(泰勒(结果,x=0,n+1),多项式);od;系数(resul,x=0,n);结束进程:
A074064号:=proc(n)局部结果,a793,dvs,i,k;结果:=0:a793:=A000793号(n) ;dvs:=数字[除数](a793);对于从1到nops(dvs)的k,i:=op(k,dvs,k);resul:=resul+numtheory[mobius](a793/i)*taylInv(i,n);od:返回(结果);结束进程:#R.J.马塔尔2007年3月30日
数学
b[n_,i_]:=b[n,i]=模[{p},p=如果[i<1,1,素数[i]];如果[n==0||i<1,1,Max[b[n,i-1],表[p^j*b[n-p^j,i-1]{j,1,Log[p,n]//Floor}]]];
g[n_]:=g[n]=b[n,如果[n<8,3,PrimePi[天花板[1.328*Sqrt[n*Log[n]//地板]]]];
a[n_]:=a[n]=级数系数[Sum[MoebiusMu[g[n]/i]/乘积[1-x^j,{j,除数[i]}],{i,除数[g[n]}]+O[x]^(n+1),n];
表[打印[“a(”,n,“)=”,a[n]];a[n],{n,0,100}](*Jean-François Alcover公司2017年4月25日,之后阿洛伊斯·海因茨*)
交叉参考
关键词
容易的,非n
作者
扩展
更多术语来自R.J.马塔尔2007年3月30日
更多术语来自肖恩·欧文2011年10月4日
更多术语来自阿洛伊斯·海因茨2015年3月29日
状态
经核准的

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

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

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