A163612 Primes of form 5207*n + 1.
437389, 510287, 541529, 562357, 604013, 749809, 781051, 853949, 874777, 968503, 978917, 1030987, 1249681, 1322579, 1437133, 1541273, 1562101, 1655827, 1812037, 1947419, 1978661, 2030731, 2124457, 2166113, 2186941, 2280667, 2634743, 2655571, 2686813, 2759711
Offset: 1
Keywords
Links
- Arkadiusz Wesolowski, Table of n, a(n) for n = 1..1000
- G. L. Honaker, Jr. and Chris Caldwell, Prime Curios! 5207
Programs
-
Magma
[5207*n+1 : n in [0..530 by 2] | IsPrime(5207*n+1)]; // Arkadiusz Wesolowski, Mar 05 2011
-
Mathematica
Select[Table[5207*n + 1, {n, 0, 530, 2}], PrimeQ] (* Arkadiusz Wesolowski, Mar 05 2011 *)
-
PARI
forstep(n=0, 530, 2, if(isprime(x=(5207*n+1)), print1(x, ", "))); \\ Arkadiusz Wesolowski, Mar 05 2011
Comments