A259257 Primes of the form n^4 - n^3 + n^2 - n + 1.

11, 61, 521, 9091, 13421, 19141, 61681, 152381, 185641, 224071, 1151041, 1824841, 2031671, 3341101, 4778021, 5200081, 8987221, 25058741, 31224301, 32928901, 40454321, 42521761, 150451621, 212601841, 250062751, 292268861, 310565641, 329708341, 339604921

Offset

1,1

Links

Ray Chandler, Table of n, a(n) for n = 1..10000 (first 893 terms from Robert Price)

OEIS Wiki, Cyclotomic Polynomials at x=sigma(n)

Formula

a(n) = A246392(A060884(n)).

Mathematica

Select[Table[Cyclotomic[10, n], {n, 0, 200}], PrimeQ]
Select[Table[n^4 - n^3 + n^2 - n + 1, {n, 200}], PrimeQ] (* Vincenzo Librandi, Jun 23 2015 *)

Prog

(Magma) [a: n in [0..200] | IsPrime(a) where a is n^4-n^3+n^2-n+1]; // Vincenzo Librandi, Jun 23 2015
(PARI) lista(nn) = for (n=1, nn, if (isprime(p=polcyclo(10, n)), print1(p, ", "))); \\ Michel Marcus, Jun 23 2015

Crossrefs

Cf. A060884, A246392.

Sequence in context: A092164 A354336 A088545 * A289646 A020454 A009016

Adjacent sequences: A259254 A259255 A259256 * A259258 A259259 A259260

Keyword

nonn,easy

Author

Robert Price, Jun 22 2015

Status

approved