|
Search: id:A139812
|
|
|
| A139812 |
|
Primes Prime[n] such that Prime[n]^2 - Prime[n + 2]*Prime[n - 2] <> 0. |
|
+0
1
|
|
| 5, 7, 11, 13, 17, 23, 29, 31, 37, 41, 53, 59, 67, 71, 97, 101, 103, 107, 127, 131, 149, 151, 163, 173, 179, 191, 193, 223, 227, 251, 257, 263, 269, 277, 307, 311, 331, 337, 347, 349, 367, 373, 379, 397, 409, 419, 421, 431, 433, 457, 461, 479, 487, 491, 499, 541
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
These primes are at the next level higher beyond good and bad primes. Bad primes come from modular forms and L-Series theory: http://en.wikipedia.org/wiki/Arithmetic_of_elliptic_curves:
|
|
REFERENCES
|
Wikipedia, http://en.wikipedia.org/wiki/Arithmetic_of_elliptic_curves
|
|
MATHEMATICA
|
Flatten[Table[If[Prime[n]^2 - Prime[n + 2]*Prime[n - 2] > 0, Prime[n], {}], {n, 3, 100}]]
|
|
CROSSREFS
|
Cf. A130903, A028388.
Sequence in context: A120222 A054794 A104860 this_sequence A040146 A015914 A023201
Adjacent sequences: A139809 A139810 A139811 this_sequence A139813 A139814 A139815
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger Bagula and Gary W. Adamsom (rlbagulatftn(AT)yahoo.com), May 23 2008
|
|
EXTENSIONS
|
Edited by N. J. A. Sloane (njas(AT)research.att.com), May 23 2008
|
|
|
Search completed in 0.002 seconds
|
