登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志


提示
问候整数序列的在线百科全书!)
A000 611 最大函数的逆A000 000a(n)是最大的x,使得φ(x)=m,其中m=m=m。A00 2202(n)是φ范围内的第n个数。
(前M1580)
十七
2, 6, 12,18, 30, 22,42, 60, 54,66, 46, 90,58, 62, 120,126, 150, 98,138, 94, 210,106, 162, 174,118, 198, 240,134, 142, 270,158, 330, 166,294, 276, 282,294, 276, 282,γ,γ,γ,γ,γ 列表图表参考文献历史文本内部格式
抵消

1,1

评论

总是偶数,当φ(2n)=φ(n)时,n是奇数。- Alain Jacques(TigeleWoat(AT)BigPo.com),6月15日2006

推荐信

格莱泽,数除数表。英国数学协会表,第8卷,Camb。大学出版社,1940,第64页。

S.N.J.A.斯隆和Simon Plouffe,《整数序列百科全书》,学术出版社,1995(包括这个序列)。

链接

诺伊,n,a(n)n=1…10000的表

R. K. Guy致新泽西州1991月6日的信

公式

A(n)=A057 635A00 2202(n)。诺德

Mathematica

phiinv[n_, pl_] := Module[{i, p, e, pe, val}, If[pl=={}, Return[If[n==1, {1}, {}]]]; val={}; p=Last[pl]; For[e=0; pe=1, e==0||Mod[n, (p-1)pe/p]==0, e++; pe*=p, val=Join[val, pe*phiinv[If[e==0, n, n*p/pe/(p-1)], Drop[pl, -1]]]]; Sort[val]]; phiinv[n_] := phiinv[n, Select[1+Divisors[n], PrimeQ]]; Last/@Select[phiinv/@Range[1, 200], #!= {} &(* pIIv[n,pL]=x与φ(x)=n的列表,以及列表PL.x中的x的所有素数除数[n]=x与φ(x)=n*的列表]

黄体脂酮素

(Perl)使用nStale:“所有”;我的$k=1;对于我的$i(1…100){ @ @ v;do{{@ v=反相totoTunt($k++)},直到@ v;打印“$i$V[-1 ] \n”;}达纳·杰克布森04三月2019

(PARI)G(n)=(n % 2, 2*(n=1),FoeStad(k=Lead(Euler)*n*log(log(n ^ 2))+2.5×n/log(log(n^ 2))),n,-1,IF(Eulelphi(k)==n,返回(k));如果(k=n,返回(0)));A057 635

Lista(NN)=(m=1,NN,IF(ISToTeNT(m),Primt1(g(m)),()));晋源王8月29日2019

交叉裁判

囊性纤维变性。A000 000A00 2202A000 2181A057 826.

有关记录见A036913A132154A036912.

语境中的顺序:A7848 A15997 A35839*A325708 A11374 A181660

相邻序列:A000 6508 A000 6509 A000 610*A000 612 A000 65 13 A000 614

关键词

诺恩

作者

斯隆

地位

经核准的

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改9月16日0:19 EDT 2019。包含327088个序列。(在OEIS4上运行)