A272284 Numbers n such that 43*n^2 - 537*n + 2971 is prime.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 36, 37, 38, 39, 40, 42, 43, 44, 45, 46, 47, 49, 50, 51, 55, 56, 57, 60, 64, 67, 68, 69, 70, 71, 72, 73, 74, 76, 77, 79, 80, 81

Offset

1,3

Comments

35 is the smallest number not in this sequence.

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Eric Weisstein's World of Mathematics, Prime-Generating Polynomials

Example

4 is in this sequence since 43*4^2 - 537*4 + 2971 = 688-2148+2971 = 1511 is prime.

Mathematica

Select[Range[0, 100], PrimeQ[43#^2 - 537# + 2971] &]

Prog

(PARI) lista(nn) = for(n=0, nn, if(ispseudoprime(43*n^2 - 537*n + 2971), print1(n, ", "))); \\ Altug Alkan, Apr 24 2016

Crossrefs

Cf. A050268, A050267, A005846, A007641, A007635, A048988, A050265, A050266.

Cf. A271980, A272030, A272074, A272075, A272160, A271144, A272285.

Sequence in context: A346447 A273883 A132145 * A322554 A330232 A273882

Adjacent sequences: A272281 A272282 A272283 * A272285 A272286 A272287

Keyword

nonn

Author

Robert Price, Apr 24 2016

Status

approved