%I#16 2018年9月13日08:09:00
%S 1,2,3,4,5,6,7,8,23,29,30,31,4016417618921837059760314731901,
%电话:217624362748273247585574
%N数字N,这样N*N!+(最小素数>n)是素数。
%请注意,枫叶、PARI等对“下一个素数”的含义有不同的概念!
%C下学期>7500_雅克·特拉姆,2018年9月12日
%e8在序列中是因为8*8!+11是质数。
%t<<数字理论`NumberTheoryFunctions`;v={};执行[If[PrimeQ[n*n!+NextPrime[n]],v=附加[v,n];打印[v]],{n,2400}]
%o(PARI)isok(n)=isprime(n*n!+nextprime(n+1));\\_米歇尔·马库斯,2018年9月13日
%Y参考A096985、A090704、A049433、A108270
%K更多,nonn
%O 1,2号机组
%2004年7月31日
%E a(24)-a(27)摘自雅克·特拉姆,2018年9月12日
|