A126427 Numbers k for which k^5-k-1 is prime.

2, 3, 4, 5, 10, 11, 15, 16, 17, 19, 20, 21, 27, 28, 30, 34, 36, 44, 48, 50, 56, 72, 75, 82, 84, 97, 101, 103, 105, 109, 113, 117, 130, 133, 141, 154, 157, 163, 177, 179, 188, 197, 204, 207, 218, 240, 248, 249, 250, 252, 262, 268, 281, 283, 285, 286, 291, 301, 305, 315

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from T. D. Noe)

Mathematica

a = {}; Do[If[PrimeQ[x^5 - x - 1], AppendTo[a, x]], {x, 1, 1000}]; a

Crossrefs

Cf. A002327, A002328, A116581, A126420, A126421, A126422, A126423, A126424, A126425, A126426.

Sequence in context: A179302 A240083 A066996 * A032860 A032884 A023787

Adjacent sequences: A126424 A126425 A126426 * A126428 A126429 A126430

Keyword

nonn

Author

Artur Jasinski, Dec 26 2006

Status

approved