A243934 Numbers k such that 6^k + k^6 + 1 is prime.

0, 2, 4, 14, 22, 26, 36, 216, 354, 874, 1018, 2798, 6116, 6574, 6922, 8090, 8398, 12866, 20816

Offset

1,2

Links

Table of n, a(n) for n=1..19.

Mathematica

Select[Range[0, 1000], PrimeQ[6^# + #^6 + 1] &]

Prog

(PARI) is(n)=ispseudoprime(6^n+n^6+1) \\ Charles R Greathouse IV, Jun 13 2017

Crossrefs

Cf. A100357, A215441, A216423, A215442, A215444.

Sequence in context: A245764 A032309 A008519 * A071865 A127596 A111871

Adjacent sequences: A243931 A243932 A243933 * A243935 A243936 A243937

Keyword

nonn,hard,more

Author

Vaclav Kotesovec, Jun 15 2014

Extensions

a(19) from Vaclav Kotesovec, Jun 16 2014

Status

approved