OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Zak Seidov)
MATHEMATICA
Select[Prime[Range[20000]], PrimeQ[2#+3]&&PrimeQ[3#+2]&]
PROG
(Magma) [p: p in PrimesUpTo(10000)| IsPrime(3*p+2) and IsPrime(2*p+3)]; // Vincenzo Librandi, Nov 13 2010
(PARI) is(p) = isprime(p) && isprime(3*p+2) && isprime(2*p+3); \\ Amiram Eldar, Nov 08 2024
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Zak Seidov, May 07 2005
STATUS
approved