|
|
A173974
|
|
Numbers k such that k^k+43 is prime.
|
|
4
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
2^2 + 43 = 47, which is prime, so 2 is in the sequence.
|
|
MATHEMATICA
|
f[n_]:=PrimeQ[n^n+43]; lst={}; Do[If[f[n], AppendTo[lst, n]], {n, 6!}]; lst
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|