OFFSET
1,1
COMMENTS
For (p-1)/2, those are the safe primes A005385.
EXAMPLE
23 is a term because: (23-1)/2 = 11, (23-2)/3 = 7, 2*23+1 = 47, 3*23+2 = 71, {23, 11, 7, 47, 71} are all prime numbers.
MATHEMATICA
Select[Range[1, 1.5*10^6, 2], AllTrue[{#, (# - 1)/2, (# - 2)/3, 2*# + 1, 3*# + 2}, PrimeQ] &] (* Amiram Eldar, Oct 11 2021 *)
PROG
(PARI) isok(p) = iferr(isprime(p) && isprime((p-1)/2) && isprime((p-2)/3) && isprime(2*p+1) && isprime(3*p+2), E, 0); \\ Michel Marcus, Oct 11 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Marc Morgenegg, Oct 11 2021
EXTENSIONS
More terms from Michel Marcus, Oct 11 2021
STATUS
approved