%I #13 Sep 08 2022 08:45:14
%S 3,7,9,10,11,14,27,30,33,37,40,51,62,71,78,80,82,95,117,125,137,142,
%T 148,157,185,189,191,197,223,232,236,252,255,265,287,321,323,324,326,
%U 332,337,341,354,369,391,414,416,418,430,487,509,545,558,563,582,588,589
%N Numbers n such that n^12 - n^6 + 1 is prime.
%H G. C. Greubel, <a href="/A097475/b097475.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[ Range[ 1000], PrimeQ[ #^12 - #^6 + 1] &]
%o (Magma) [n: n in [0..700] | IsPrime(n^12-n^6+1)]; // _Vincenzo Librandi_, Jan 17 2015
%o (PARI) is(n)=isprime(n^12-n^6+1) \\ _Charles R Greathouse IV_, Feb 17 2017
%K nonn
%O 1,1
%A _Robert G. Wilson v_, Sep 18 2004