%I#11 2022年9月8日08:45:36
%S 5315731352167793710931249130116118732029208122372341,
%电话:23932549286131213329343379740574421473348894935669,
%电话:5981639764496553670967616917772297333748975417853800982698581
%N个素数与1模52一致。
%H Vincenzo Librandi,n的表,n=1..1000的a(n)</a>
%t选择[Prime[范围[1300]],MemberQ[{1},Mod[#,52]]&](*_Winenzo Librandi_,2012年8月29日*)
%t选择[Range[19000,52],PrimeQ](*哈维·P·戴尔,2013年6月25日*)
%o(岩浆)[PrimesUpTo(9000)中的p:p | p mod 52 eq 1];//_文森佐·利班迪(Vincenzo Librandi),2012年8月29日
%o(PARI)is(n)=isprime(n)&&n%52==1\\_Charles R Greathouse IV_,2016年7月1日
%Y参考A000040。
%K nonn,简单
%O 1,1号机组
%A _N.J.A.Sloane,2008年7月11日
|