|
|
A216977
|
|
Primes of the form n^5+2.
|
|
4
|
|
|
2, 3, 59051, 161053, 759377, 14348909, 90224201, 345025253, 601692059, 12762815627, 73439775751, 183765996901, 296709280759, 503756397101, 576650390627, 657748550153, 1572763671877, 1751989905403, 1880287678127, 2389769101501, 3101364196877, 3201078401359
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
lst={}; Do[p=n^5+2; If[PrimeQ[p], AppendTo[lst, p]], {n, 6!}]; lst
|
|
PROG
|
(PARI)
v=select(n->isprime(n^5+2), vector(2000, n, n-1)); /* A216976 */
vector(#v, n, v[n]^5+2)
(Magma) [a: n in [0..400] | IsPrime(a) where a is n^5+2]; // Vincenzo Librandi, Mar 15 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|