|
| |
|
|
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
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
MATHEMATICA
| Join[{1}, Select[Range[2, 400], PrimeQ[Prime[ # ] + 2*(# - 1)*Prime[ # - 1]] &]]
|
|
|
CROSSREFS
| Sequence in context: A066077 A103740 A034155 * A184105 A062469 A034156
Adjacent sequences: A129587 A129588 A129589 * A129591 A129592 A129593
|
|
|
KEYWORD
| nonn,less
|
|
|
AUTHOR
| J. M. Bergot (thekingfishb(AT)yahoo.ca), May 30 2007
|
|
|
EXTENSIONS
| Edited and extended by Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Jul 26 2007
|
| |
|
|
