[go: up one dir, main page]

login
A213162
Smallest prime p such that (k+1)*p^2-k are prime for k=1..n.
0
2, 199, 409, 17569, 981091, 3918251, 1329433951, 75902670689, 45048280453021
OFFSET
1,1
COMMENTS
a(1..8) are the first terms correspondingly in A106483, A213078, A213079, A213107, A213125, A213159, A213161, A213334.
PROG
(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
CROSSREFS
Sequence in context: A262650 A123100 A033147 * A124339 A089772 A280090
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Jun 06 2012
EXTENSIONS
a(9) from Tyler Busby, Jan 11 2023
STATUS
approved