OFFSET
1,1
COMMENTS
Name was: Primes p such that (p+p')/2+1 is a prime, where p' is the next prime after p.
PROG
(PARI) lista(nn) = {forprime(p=3, nn, if (isprime(1+(p + nextprime(p+1))\2), print1(p, ", ")); ); } \\ Michel Marcus, Jun 03 2013
CROSSREFS
KEYWORD
dead
AUTHOR
Giovanni Teofilatto, Apr 25 2004
EXTENSIONS
After correction a duplicate of A001359, Michel Marcus, Jun 03 2013
STATUS
approved