A175170 Primes of the form k^6 - k^3 + 1.

46441, 117307, 530713, 5488957657, 13841169553, 24794753833, 82653662521, 151333837273, 282429005041, 464403405313, 782756904961, 999999000001, 1418517921241, 2699552509993, 2985982272001, 3138426605161, 4001502141001, 28722895031251, 47045874141001, 56693904845761, 78672332016307

Offset

1,1

Links

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

Formula

A000040 INTERSECT A060891.

Mathematica

Select[Table[n^6-n^3+1, {n, 0, 2000}], PrimeQ] (* Vincenzo Librandi, Jul 26 2012 *)

Prog

(Magma) [ a: n in [0..250] | IsPrime(a) where a is n^3*(n^3-1)+1 ];

Crossrefs

Cf. A000040, A060891, A164989.

Sequence in context: A185518 A390356 A230237 * A204495 A157527 A186876

Adjacent sequences: A175167 A175168 A175169 * A175171 A175172 A175173

Keyword

nonn,easy

Author

Vincenzo Librandi, Dec 03 2010

Status

approved