OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
3 is in the sequence, being the second prime, as we verify that 2 * prime(2) + prime(2 * 2) = 2 * 3 + 7 = 13, which is also prime.
5 is in the sequence, being the third prime, as we see that 2 * prime(3) + prime(2 * 3) = 2 * 5 + 13 = 23, which is also prime.
7 is not in the sequence, since it gives 2 * prime(4) + prime(2 * 4) = 2 * 7 + 19 = 33 = 3 * 11, which is not prime.
MATHEMATICA
Prime[Select[Range[300], PrimeQ[2Prime[#] + Prime[2#]] &]] (* Alonso del Arte, Sep 08 2013 *)
Select[Prime[Range[350]], PrimeQ[2#+Prime[2PrimePi[#]]]&] (* Harvey P. Dale, Mar 11 2019 *)
PROG
(PARI) v=List(); n=q=0; forprime(p=2, 1e4, if(n++%2, next); q=nextprime(q+1); if(isprime(2*q+p), listput(v, q))); Vec(v) \\ Charles R Greathouse IV, Sep 05 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Irina Gerasimova, Sep 04 2013
EXTENSIONS
Terms corrected by Charles R Greathouse IV, Sep 05 2013
STATUS
approved