login
A075752
210*n -/+ 17 ares both primes.
1
1, 3, 4, 7, 8, 9, 22, 26, 32, 42, 45, 46, 52, 56, 57, 58, 62, 70, 75, 79, 81, 84, 86, 87, 96, 99, 100, 101, 103, 111, 129, 139, 142, 143, 146, 166, 178, 179, 185, 191, 196, 200, 201, 202, 216, 217, 234, 235, 240, 241, 252, 253, 260, 265, 267, 276, 294, 295, 298
OFFSET
1,2
LINKS
EXAMPLE
n=1: 210*1-17=193 and 210*1+17=227 are primes.
MATHEMATICA
Select[Range[1, 300], PrimeQ[210 # - 17]&&PrimeQ[210 # + 17]&] (* Vincenzo Librandi, Oct 05 2013 *)
PROG
(PARI) isok(n) = isprime(210*n+17) && isprime(210*n-17); \\ Michel Marcus, Oct 03 2013
(Magma) [n: n in [1..350] | IsPrime(210*n-17) and IsPrime(210*n+17)]; // Vincenzo Librandi, Oct 05 2013
CROSSREFS
Sequence in context: A363751 A129142 A359749 * A046541 A324470 A219897
KEYWORD
easy,nonn
AUTHOR
Zak Seidov, Oct 08 2002
STATUS
approved