A062403 Primes of the form 2*k*prime(k) + 1.

5, 13, 31, 157, 239, 683, 1697, 3067, 4273, 5563, 6323, 6781, 9043, 13841, 16427, 22247, 22901, 23767, 27109, 32687, 33721, 45833, 58217, 61933, 83341, 90583, 94811, 115979, 158161, 172751, 193619, 202877, 221567, 284233, 297967, 308773

Offset

1,1

Links

Harry J. Smith, Table of n, a(n) for n = 1..1000

Maple

select(isprime, [seq(2*i*ithprime(i)+1, i=1..200)]);  # Muniru A Asiru, Jun 29 2018

Prog

(PARI) je=[]; for(n=0, 200, if(isprime(2*n*prime(n)+1), je=concat(je, 2*n*prime(n)+1), )); je
(PARI) { n=c=0; forprime (p=2, 5*10^5, q=2*(c++)*p + 1; if (isprime(q), write("b062403.txt", n++, " ", q); if (n==1000, break)) ) } \\ Harry J. Smith, Aug 07 2009

Crossrefs

Sequence in context: A146368 A147424 A146057 * A066688 A046789 A271902

Adjacent sequences: A062400 A062401 A062402 * A062404 A062405 A062406

Keyword

easy,nonn

Author

Jason Earls, Jul 08 2001

Extensions

Definition corrected by Harry J. Smith, Aug 07 2009

Name simplified by Jon E. Schoenfield, Jun 29 2018

Status

approved