|
| |
|
|
A050267
|
|
Primes or negative values of primes in sequence b(n) = 47*n^2-1701*n+10181, n >= 0.
|
|
2
| |
|
|
10181, 8527, 6967, 5501, 4129, 2851, 1667, 577, -419, -1321, -2129, -2843, -3463, -3989, -4421, -4759, -5003, -5153, -5209, -5171, -5039, -4813, -4493, -4079, -3571, -2969, -2273, -1483, -599, 379, 1451, 2617, 3877, 5231, 6679, 8221, 9857, 11587, 13411, 15329, 17341, 19447
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Terms are listed in the order of appearance in sequence b.
|
|
|
REFERENCES
| G. W. Fung & H. C. Williams, Quadratic polynomials which have a high density of prime values, Math. Comput., Vol.55(1990) 345-353.
R. K. Guy,Unsolved Problems in Number Theory,(3nd edition, Springer,2004),ISBN 0-387-20860-7, Section A17, page 59.
|
|
|
LINKS
| C. Rivera, Problem 12: Prime producing polynomials
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
|
MATHEMATICA
| lst={}; Do[p=47*n^2-1701*n+10181; If[PrimeQ[p], AppendTo[lst, p]], {n, 0, 5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jan 29 2009]
Select[Table[47n^2-1701n+10181, {n, 0, 50}], PrimeQ] (* From Harvey P. Dale, Oct 03 2011 *)
|
|
|
CROSSREFS
| Cf. A002383, A027753, A027755, A005471, A027758, A048059, A007635, A005846, A116206, A050268, A022464.
Sequence in context: A153139 A184205 A128878 * A102326 A105582 A100968
Adjacent sequences: A050264 A050265 A050266 * A050268 A050269 A050270
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Eric Weisstein (eric(AT)weisstein.com)
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane (njas(AT)research.att.com), May 10 2007
Further edited by Klaus Brockhaus, Mar 20 2010
|
| |
|
|