|
|
A248372
|
|
Numbers m such that both p = 52*m + 1 and q = 52*p + 1 are prime.
|
|
1
|
|
|
36, 39, 60, 126, 171, 189, 195, 300, 315, 405, 420, 435, 504, 540, 570, 606, 720, 756, 816, 876, 960, 1089, 1221, 1224, 1260, 1329, 1365, 1371, 1389, 1404, 1530, 1554, 1674, 1740, 1785, 1791, 1914, 1959, 2085, 2244, 2304, 2334, 2376, 2451, 2454, 2520, 2631, 2646, 2715, 2799, 2976
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms are divisible by 3, because if m == 1 or 2 (mod 3), either q or p is divisible by 3.
|
|
LINKS
|
|
|
MATHEMATICA
|
s={}; Do[If[PrimeQ[p=52*n+1)]&&PrimeQ[52*p+1], AppendTo[s, n]], {n, 3000}]; s
|
|
PROG
|
(PARI)
for(n=1, 10^4, p=52*n+1; if(isprime(p)&&isprime(52*p+1), print1(n, ", "))) \\ Derek Orr, Oct 06 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|