|
| |
|
|
A128878
|
|
Primes of form 47*n^2 - 1701*n + 10181.
|
|
0
| |
|
|
10181, 8527, 6967, 5501, 4129, 2851, 1667, 577, 379, 1451, 2617, 3877, 5231, 6679, 8221, 9857, 11587, 13411, 15329, 17341, 19447, 21647, 31387, 34057, 36821, 39679, 45677, 48817, 52051, 65927, 81307, 89561, 102647, 107197, 116579, 126337, 131357
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Primes are given in the order in which they arise for increasing n.
Polynomial generates 22 primes for 0 <= n <= 42, i.e. for n = 0, 1, 2, 3, 4, 5, 6, 7, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42.
If the definition is replaced by " Numbers n of the form 47*k^2 - 1701*k + 10181 such that either n or -n is a prime" we get (essentially) A050267.
|
|
|
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
|
|
|
EXAMPLE
| Polynomial 47k^2 - 1701k + 10181 = 21647 for k = 42
|
|
|
MATHEMATICA
| Select[Table[47*n^2 - 1701*n + 10181, {n, 0, 100}], # > 0 && PrimeQ[#] &] (* T. D. Noe, Aug 02 2011 *)
|
|
|
CROSSREFS
| Cf. A050267, A002383, A027753, A027755, A005471, A027758, A048059, A007635, A005846, A116206, A050268, A022464.
Sequence in context: A172810 A153139 A184205 * A050267 A102326 A105582
Adjacent sequences: A128875 A128876 A128877 * A128879 A128880 A128881
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Douglas Winston (douglas.winston(AT)srupc.com), Apr 17 2007
|
|
|
EXTENSIONS
| Edited by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Apr 22 2007 and by N. J. A. Sloane (njas(AT)research.att.com), May 05 2007 and May 06 2007
|
| |
|
|
