A097475 Numbers n such that n^12 - n^6 + 1 is prime.

3, 7, 9, 10, 11, 14, 27, 30, 33, 37, 40, 51, 62, 71, 78, 80, 82, 95, 117, 125, 137, 142, 148, 157, 185, 189, 191, 197, 223, 232, 236, 252, 255, 265, 287, 321, 323, 324, 326, 332, 337, 341, 354, 369, 391, 414, 416, 418, 430, 487, 509, 545, 558, 563, 582, 588, 589

Offset: 1

Author

Robert G. Wilson v, Sep 18 2004

Keywords

• nonn

Links

• G. C. Greubel, Table of n, a(n) for n = 1..10000

Programs

Magma

[n: n in [0..700] | IsPrime(n^12-n^6+1)]; // Vincenzo Librandi, Jan 17 2015

Mathematica

Select[ Range[ 1000], PrimeQ[ #^12 - #^6 + 1] &]

PARI

is(n)=isprime(n^12-n^6+1) \\ Charles R Greathouse IV, Feb 17 2017