

A230663


Least prime p such that x^2 + 3*x + p produces primes for x = 0..n1 but not x = n.


1



2, 67, 3, 349, 79, 439, 21559, 14713, 13, 8123233, 223, 3468214093
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

a(39) = 43 and all other terms > 128865958933.


LINKS



MATHEMATICA

Table[p = 2; While[! (Union[Table[PrimeQ[x^2 + 3*x + p], {x, 0, n  1}]] == {True} && PrimeQ[n^2 + 3*n + p] == False), p = NextPrime[p]]; p, {n, 9}] (* T. D. Noe, Oct 29 2013 *)


CROSSREFS



KEYWORD

nonn,more


AUTHOR



STATUS

approved



