OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
89 is in the sequence because 2*89 + 3 = 181 and 4*89 + 3 = 359 are both prime.
MATHEMATICA
Select[Prime[Range[600]], AllTrue[{2#+3, 4#+3}, PrimeQ]&] (* Harvey P. Dale, Dec 24 2023 *)
PROG
(Magma) [p: p in PrimesUpTo(4500) | IsPrime(2*p+3) and IsPrime(4*p+3)]; // Bruno Berselli, Mar 03 2014
(PARI) select(p->isprime(2*p+3)&&isprime(4*p+3), primes(1000)) \\ Charles R Greathouse IV, Mar 06 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Lopatin, Mar 03 2014, following a suggestion by Juri-Stepan Gerasimov
EXTENSIONS
Edited by Bruno Berselli, Mar 03 2014
STATUS
approved