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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A286510型 在2<=x<=prime(n)-2下,g^x==x(mod p)没有解的本原根g mod prime(n)的个数。 1
1, 1, 1, 1, 2, 1, 1, 3, 4, 2, 1, 6, 5, 2, 9, 11, 12, 5, 7, 9, 8, 8, 17, 12, 11, 16, 12, 23, 20, 16, 17, 17, 23, 17, 26, 18, 19, 25, 26, 32, 38, 21, 21, 18, 27, 25, 24, 27, 52, 30, 44, 33, 19, 44, 54, 45, 57, 14, 29, 27, 39, 58, 28, 41, 39, 62, 26, 25, 69, 48, 51, 61, 44, 47, 37, 63, 77, 55, 55, 41 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,5
链接
罗伯特·伊斯雷尔,n=1..1000时的n,a(n)表
M.Levin、C.Pomerance、K.Soundararajan、,离散对数的不动点收录:Hanrot G.,Morain F.,ThoméE.(编辑)算法数论。ANTS 2010。计算机科学讲义,第6197卷。施普林格,柏林,海德堡(2010)。
配方奶粉
a(n)=A008330美元(n)-A174407号(n) 对于n>=2。
MAPLE公司
f: =proc(n)局部p,r,S,r,x;
p: =ithprime(n);
r: =数量理论:-primroot(p);
S: =选择(t->igcd(t,p-1)=1,{$1..p-1});
R: =地图(s->R&^s mod p,s);
对于x从2到p-2 do
R: =删除(t->(t&^x-x mod p=0),R);
od;
nops(R);
终末程序;
地图(f,[1..100]美元);
数学
连接[{1},表[p=素数[n];EulerPhi[EulerPhi[p]]-长度[Select[PrimitiveRootList[p],MemberQ[PowerMod[#,Range[p-1],p]-范围[p-1],0]&]],{n,2,100}]](*Jean-François Alcover公司2020年10月11日之后T.D.诺伊在里面A174407号*)
交叉参考
囊性纤维变性。A008330号,A174407号
关键词
非n
作者
罗伯特·伊斯雷尔2017年5月10日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月1日14:36。包含372174个序列。(在oeis4上运行。)