A216979 Primes of the form n^6+2.

2, 3, 3518743763, 17596287803, 282429536483, 54980371265627, 93385106978411, 110322650964683, 151939915084883, 1363532208525371, 1870004703089603, 3684302682180851, 5257948522194371, 15813440003753003, 22416464978706683, 33227552537453171, 80425212553252451

Offset: 1

Author

Michel Lagneau, Sep 21 2012

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A056899, A144953, A216975, A216977.

Programs

Magma

[a: n in [0..700] | IsPrime(a) where a is n^6 + 2 ]; // Vincenzo Librandi, Oct 12 2012

Mathematica

lst={}; Do[p=n^6+2; If[PrimeQ[p], AppendTo[lst, p]], {n, 6!}]; lst
Select[Table[n^6 + 2, {n, 0, 700}], PrimeQ] (* Vincenzo Librandi, Oct 12 2012 *)

PARI

v=select(n->isprime(n^6+2),vector(2000,n,n-1)); /* A216978 */
vector(#v, n, v[n]^6+2)
/* Joerg Arndt, Sep 21 2012 */