%I#18 2022年9月8日08:44:58

%S 2,3,5,7,13,17,19,23,37,47,53,59,67,73,79,83,89,97103107109137，

%电话1391491511571631671731791931992232272223424125257，

%电话：26326927728329330731331734734935335936737338389397409

%N素数p，使得x^35=2具有解模p。

%C A059337相对于A000040的补体。-_文森佐·利班迪（Vincenzo Librandi），2012年9月14日

%H R.J.Mathar，n表，n=1..1000的a（n）</a>

%H<a href=“/index/Pri#smp”>为相关序列的条目编制索引</a>

%t ok[p_]：=减少[Mod[x^35-2，p]==0，x，Integers]=！=错误；选择[Prime[范围[100]]，确定]（*_Winenzo Librandi_，2012年9月14日*）

%o（岩浆）[PrimesUpTo（500）中的p:p |存在（t）{x:x在剩余分类环（p）中|x^35 eq 2}]；//_文森佐·利班迪（Vincenzo Librandi），2012年9月14日

%o（PARI）

%o N=10^4；默认值（primelimit，N）；

%ok（p，r，k）={return（（p==r）||（Mod（r，p）^（（p-1）/gcd（k，p-1））==1））；}

%o表示质数（p=2，N，如果（ok（p，2,35），打印1（p，“，”））；

%o/*_Joerg Arndt_，2012年9月21日*/

%Y参考A000040、A059337。

%K nonn，简单

%O 1,1号机组

%A _N.J.A.斯隆_