[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A142508
Primes congruent to 1 mod 52.
6
53, 157, 313, 521, 677, 937, 1093, 1249, 1301, 1613, 1873, 2029, 2081, 2237, 2341, 2393, 2549, 2861, 3121, 3329, 3433, 3797, 4057, 4421, 4733, 4889, 4993, 5669, 5981, 6397, 6449, 6553, 6709, 6761, 6917, 7177, 7229, 7333, 7489, 7541, 7853, 8009, 8269, 8581
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[1300]], MemberQ[{1}, Mod[#, 52]] &] (* Vincenzo Librandi, Aug 29 2012 *)
Select[Range[1, 9000, 52], PrimeQ] (* Harvey P. Dale, Jun 25 2013 *)
PROG
(Magma) [p: p in PrimesUpTo(9000) | p mod 52 eq 1]; // Vincenzo Librandi, Aug 29 2012
(PARI) is(n)=isprime(n) && n%52==1 \\ Charles R Greathouse IV, Jul 01 2016
CROSSREFS
Cf. A000040.
Sequence in context: A353136 A053070 A140655 * A279259 A142639 A141880
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jul 11 2008
STATUS
approved