|
| |
|
|
A045546
|
|
Numbers n such that n^2+n-1 is prime.
|
|
17
| |
|
|
2, 3, 4, 5, 6, 8, 9, 10, 11, 13, 15, 16, 19, 20, 21, 24, 26, 28, 30, 31, 35, 38, 39, 41, 44, 45, 46, 48, 50, 53, 54, 55, 56, 59, 60, 64, 65, 66, 68, 70, 76, 83, 85, 86, 89, 93, 94, 96, 100, 101, 103, 114, 115, 120, 125, 126, 130, 131, 134, 138, 140
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
REFERENCES
| L. Poletti, Le serie dei numeri primi appartenente alle due forme quadratiche (A) n^2+n+1 e (B) n^2+n-1 ..., Atti della Reale Accademia Nazionale dei Lincei, Memorie della Classe di Scienze Fisiche, Matematiche e Naturali, s. 6. 3 (1929), 193-218.
|
|
|
MATHEMATICA
| lst={}; Do[If[PrimeQ[n^2+n-1], Print[n]; AppendTo[lst, n]], {n, 10^5}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Aug 25 2008]
Select[Range[150], PrimeQ[#^2+#-1]&] (* From Harvey P. Dale, Jan 27 2012 *)
|
|
|
CROSSREFS
| Equals A002328-1. Cf. A002327, A002384.
Sequence in context: A177989 A022774 A153134 * A050026 A174788 A129143
Adjacent sequences: A045543 A045544 A045545 * A045547 A045548 A045549
|
|
|
KEYWORD
| nonn,nice,easy
|
|
|
AUTHOR
| Paul Jobling (paul.jobling(AT)whitecross.com)
|
| |
|
|
