OFFSET
1,1
COMMENTS
This cubic polynomial produces 40 consecutive primes for k = 0, 1, ..., 39. - Hilko Koning, Jan 20 2026
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000 (first 3092 terms from Robert Price)
Eric Weisstein's World of Mathematics, Prime-Generating Polynomial.
EXAMPLE
151967 is prime and it is in this sequence since 151967 = 42*4^3 + 270*4^2 - 26436*4 + 250703.
MAPLE
f:=k -> 42*k^3 + 270*k^2 - 26436*k + 250703:
select(isprime, map(f, [$0..100])); # Robert Israel, Jan 20 2026
MATHEMATICA
n = Range[0, 100]; Select[42n^3 + 270n^2 - 26436n + 250703, PrimeQ[#] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Price, Apr 23 2016
STATUS
approved
