A075985 Numbers k such that k^5 + 6^k is prime.

1, 11, 41, 121, 157, 5317, 58247, 74741

Offset

1,2

Comments

Corresponding primes are in A075984.

Links

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

Mathematica

k = 1; lst = {}; While[k < 30001, If[ PrimeQ[k^5 + 6^k], AppendTo[lst, k]; Print@ k]; k++]; lst (* Robert G. Wilson v, Dec 16 2010 *)
Select[Range[5500], PrimeQ[#^5+6^#]&] (* Harvey P. Dale, Feb 14 2018 *)

Prog

(Magma) [n: n in [0..900] | IsPrime(n^5+6^n)]; // Vincenzo Librandi, Dec 16 2010
(PARI) is(n)=ispseudoprime(n^5+6^n) \\ Charles R Greathouse IV, Jun 12 2017

Crossrefs

Sequence in context: A260266 A195117 A027086 * A356125 A334545 A268930

Adjacent sequences: A075982 A075983 A075984 * A075986 A075987 A075988

Keyword

nonn,more,changed

Author

Zak Seidov, Oct 17 2002

Extensions

a(7)-a(8) from Michael S. Branicky, Aug 10 2024

Status

approved