A168149 Numbers n such that n^8+(n-1)^8 is a prime.
2, 6, 18, 24, 33, 34, 36, 40, 43, 67, 69, 77, 79, 91, 114, 119, 130, 153, 182, 187, 189, 199, 221, 222, 230, 232, 288, 301, 307, 308, 312, 317, 349, 363, 381, 402, 410, 415, 427, 444, 454, 465, 488, 504, 509, 511, 512, 561, 573, 594, 629, 645, 647, 663, 692
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A153504.
Programs
-
Magma
[n: n in [0..700] | IsPrime(n^8 + (n-1)^8)]; // Vincenzo Librandi, Apr 05 2013
-
Mathematica
Select[Range[0, 1000], PrimeQ[#^8 + (#-1)^8]&] (* Vincenzo Librandi, Apr 05 2013 *)
Extensions
308 and 512 inserted by R. J. Mathar, Nov 19 2009