A213162 Smallest prime p such that (k+1)*p^2-k are prime for k=1..n.
2, 199, 409, 17569, 981091, 3918251, 1329433951, 75902670689, 45048280453021
Offset: 1
Programs
-
PARI
a(n) = {my(p = 2); until (ok, ok = 1; for (k = 1, n, if (! isprime((k+1)*p^2-k), ok = 0; break;);); if (!ok, p = nextprime(p+1);)); return (p);} \\ Michel Marcus, Apr 19 2013
Extensions
a(9) from Tyler Busby, Jan 11 2023
Comments