login
A129590
Numbers n such that prime(n) + 2*(n-1)*prime(n-1) is prime.
0
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
MATHEMATICA
Join[{1}, Select[Range[2, 400], PrimeQ[Prime[ # ] + 2*(# - 1)*Prime[ # - 1]] &]]
CROSSREFS
Sequence in context: A306435 A034155 A306403 * A261132 A262525 A184105
KEYWORD
nonn,less
AUTHOR
J. M. Bergot, May 30 2007
EXTENSIONS
Edited and extended by Stefan Steinerberger, Jul 26 2007
STATUS
approved