A129590 Numbers n such that prime(n) + 2*(n-1)*prime(n-1) is prime.

1, 2, 3, 4, 5, 7, 8, 10, 12, 13, 14, 20, 23, 24, 26, 28, 29, 31, 33, 34, 35, 44, 46, 53, 58, 62, 64, 88, 108, 112, 116, 130, 146, 148, 155, 157, 164, 167, 172, 176, 179, 181, 190, 191, 202, 218, 222, 227, 230, 235, 238, 242, 244, 246, 248, 257, 262, 268, 274, 280, 289

Offset

1,2

Links

Table of n, a(n) for n=1..61.

Mathematica

Join[{1}, Select[Range[2, 400], PrimeQ[Prime[ # ] + 2*(# - 1)*Prime[ # - 1]] &]]

Crossrefs

Sequence in context: A306435 A034155 A306403 * A261132 A262525 A184105

Adjacent sequences: A129587 A129588 A129589 * A129591 A129592 A129593

Keyword

nonn,less

Author

J. M. Bergot, May 30 2007

Extensions

Edited and extended by Stefan Steinerberger, Jul 26 2007

Status

approved