A338566 Primes p such that (p*q) mod r is prime, where q and r are the next primes after p.
5, 11, 19, 29, 43, 47, 283
Offset: 1
Examples
a(3)=19 is in the sequence because it is prime, the next two primes are 23 and 29, and (19*23) mod 29 = 2, which is prime.
Programs
-
Maple
R:= NULL: q:= 2: r:= 3: count:= 0: for i from 1 to 10000 do p:= q; q:= r; r:= nextprime(r); if isprime(p*q mod r) then count:= count+1; R:= R, p fi od: R;
Comments