|
|
A351377
|
|
Primes p such that if the next prime is q, (q-p-1)! mod p is prime.
|
|
1
|
|
|
23, 61, 73, 83, 211, 409, 449, 509, 719, 787, 829, 887, 1039, 1237, 1409, 1459, 1627, 1831, 1879, 1913, 2089, 2179, 2297, 2521, 2647, 2663, 2699, 2879, 2909, 2927, 3011, 3041, 3049, 3121, 3209, 3331, 3361, 3433, 3491, 3583, 3659, 3719, 3863, 3889, 3967, 4289, 4327, 4349, 4363, 4373, 4583, 4679
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Primes p such that the product of composites between p and the next prime has prime remainder on division by p.
|
|
LINKS
|
|
|
EXAMPLE
|
a(3) = 73 is a term because 73 is prime, the next prime is 79, (79-73-1)! = 120 and 120 mod 73 = 47 is prime.
|
|
MAPLE
|
R:= NULL: count:= 0: q:= 2:
while count < 100 do
p:= q; q:= nextprime(p);
if isprime((q-p-1)! mod p) then
count:= count+1; R:= R, p;
fi
od:
R;
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|