login
A075985
Numbers k such that k^5 + 6^k is prime.
1
1, 11, 41, 121, 157, 5317, 58247, 74741
OFFSET
1,2
COMMENTS
Corresponding primes are in A075984.
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
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Oct 17 2002
EXTENSIONS
a(7)-a(8) from Michael S. Branicky, Aug 10 2024
STATUS
approved