login
A075982
Numbers k such that k^5 + 4^k is prime.
0
1, 3, 7, 9, 37, 99, 319, 6559, 7249, 18327
OFFSET
1,2
MATHEMATICA
Select[Range[10000], PrimeQ[#^5 + 4^#] &] (* Vincenzo Librandi, Oct 04 2012 *)
PROG
(PARI) is(n)=ispseudoprime(n^5+4^n) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Sequence in context: A031161 A031882 A199190 * A100839 A013624 A053366
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Oct 17 2002
EXTENSIONS
More terms from Ralf Stephan, Mar 25 2003
a(8)-a(9) from Vincenzo Librandi, Oct 04 2012
a(10) from Michael S. Branicky, Jul 13 2023
STATUS
approved