OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Table[Prime[n]+2n, {n, 68000}], PrimeQ] (* Vincenzo Librandi, Dec 09 2011 *)
PROG
(Magma) [a: n in [1..200] | IsPrime(a) where a is NthPrime(n)+2*n ]; // Vincenzo Librandi, Dec 09 2011
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Reinhard Zumkeller, Dec 13 2002
STATUS
approved