OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
EXAMPLE
3 is OK because p(3) + 2*3 = 5 + 6 = 11 is prime.
MATHEMATICA
Select[Range[200], PrimeQ[Prime[#]+2#]&] (* Harvey P. Dale, Sep 01 2015 *)
PROG
(Magma) [n: n in [0..500]| IsPrime(NthPrime(n) +2*n)]; // G. C. Greubel, May 04 2018
(PARI) select(x->isprime(x), vector(500, n, prime(n) + 2*n), 1) \\ G. C. Greubel, May 04 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Oct 05 2002
STATUS
approved