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,1

Links

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

Mathematica

Select[Range[0, 1000], PrimeQ[#^8 + (#-1)^8]&] (* Vincenzo Librandi, Apr 05 2013 *)

Prog

(Magma) [n: n in [0..700] | IsPrime(n^8 + (n-1)^8)]; // Vincenzo Librandi, Apr 05 2013

Crossrefs

Cf. A153504.

Sequence in context: A050832 A300600 A342035 * A275990 A220142 A032649

Adjacent sequences: A168146 A168147 A168148 * A168150 A168151 A168152

Keyword

nonn,easy

Author

Vincenzo Librandi, Nov 19 2009

Extensions

308 and 512 inserted by R. J. Mathar, Nov 19 2009

Status

approved