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

 

标志
提示
(来自的问候整数序列在线百科全书!)
2005年2月62日 a(n)是满足lambda(m)=n的最大数m,如果没有解,则为零,其中lambda是Carmichael的lambda函数A002322号(m) ●●●●。 4
2, 24, 0, 240, 0, 504, 0, 480, 0, 264, 0, 65520, 0, 0, 0, 16320, 0, 28728, 0, 13200, 0, 552, 0, 131040, 0, 0, 0, 6960, 0, 171864, 0, 32640, 0, 0, 0, 138181680, 0, 0, 0, 1082400, 0, 151704, 0, 5520, 0, 1128, 0, 4455360, 0, 0, 0, 12720, 0, 86184, 0, 13920, 0, 1416, 0, 6814407600, 0, 0, 0, 65280 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
a(n)是最大模m,使得乘法群模m中任何元素的最大阶为n;如果不存在具有最大阶n的群,则a(n)为零。
省略零表示A143407号.
如果n不是A002174号.
链接
R.D.Carmichael,关于一个新数论函数的注记,公牛。阿默尔。数学。《判例汇编》第16卷(1910年),第232-238页。
数学
a[n_]:=模[{f,fsz,g=1,h=1,p,e},其中[n<=0,返回[0],n==1,返回[2],奇数Q[n],返回[0]];f=系数整数[n][[All,1]];fsz=长度[f];对于[k=1,k<=fsz,k++,p=f[[k]];e=1;而[Mod[n,CarmichaelLambda[p^e]]==0,e++];g*=p^(e-1)];Do[If[PrimeQ[d+1]&&Mod[g,d+1]!=0,h*=(d+1)],{d,除数[n]}];g*=小时;如果[CarmichaelLambda[g]!=n、 0,g]];
a/@范围[100](*Jean-François Alcover公司2019年10月18日之后Gheorghe Coserea公司*)
黄体脂酮素
(PARI)
λ(n)={\\A002322号
my(f=因子(n),fsz=矩阵大小(f)[1]);
lcm(向量(fsz,k,my(p=f[k,1],e=f[k,2]);
如果(p!=2,p^(e-1)*(p-1),e>2,2^;
};
a(n)={
如果(n<=0,返回(0),n==1,返回(2),n%2,返回(O));
my(f=因子(n),fsz=矩阵大小(f)[1],g=1,h=1);
对于(k=1,fsz,my(p=f[k,1],e=1);
而(n%lambda(p^e)==0,e++);g*=p^(e-1));
对于div(n,d,if(i素数(d+1)&&g%(d+10,h*=(d+1));
g*=小时;如果(λ(g)!=n、 0,克);
};
向量(64,n,a(n))\\Gheorghe Coserea公司2019年2月21日
交叉参考
另请参见A321713飞机(解决方案的数量)。
关键词
非n
作者
乔格·阿恩特2016年3月19日
扩展
由更正和扩展Gheorghe Coserea公司2019年2月21日
条目修订人N.J.A.斯隆2019年5月3日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年3月29日11:14。包含371278个序列。(在oeis4上运行。)