OFFSET
1,2
LINKS
Pierre CAMI and Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 2028 terms from Cami)
EXAMPLE
5 is in the sequence because 71 and 73 are twin primes.
MATHEMATICA
Select[Range[0, 800], AllTrue[#^2 +#+{41, 43}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, May 20 2016 *)
PROG
(PARI) isok(n) = isprime(n^2+n+41) && isprime(n^2+n+43); \\ Michel Marcus, Oct 03 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Aug 08 2003
STATUS
approved