OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
EXAMPLE
n=2: 210*2-11=409 and 210*2+11=431 are primes.
MATHEMATICA
Select[Range[1, 300], PrimeQ[210 # - 11]&&PrimeQ[210 # + 11] &] (* Vincenzo Librandi, Oct 05 2013 *)
PROG
(PARI) isok(n) = isprime(210*n+11) && isprime(210*n-11); \\ Michel Marcus, Oct 03 2013
(Magma) [n: n in [1..350] | IsPrime(210*n-11) and IsPrime(210*n+11)]; // Vincenzo Librandi, Oct 05 2013
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Zak Seidov, Oct 08 2002
STATUS
approved