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