A300981 Numbers k such that k^k - 10 is a prime.

3, 9, 27, 249

Offset

1,1

Comments

Next term, if it exists, is greater than 5000. - Vaclav Kotesovec, Mar 25 2018

Links

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

Mathematica

Select[Range[1000], PrimeQ[#^# - 10] &] (* Vaclav Kotesovec, Mar 25 2018 *)

Prog

(PARI) isok(k) = ispseudoprime(k^k - 10); \\ Altug Alkan, Mar 17 2018

Crossrefs

Numbers k such that k^k + b is a prime: this sequence (b=-10), A300976 (b=-5), A100408 (b=-2), A100407 (b=2), A166852 (b=3), A100837 (b=4), A100838 (b=7), A300292 (b=9), A100839 (b=10), A173974 (b=43).

Sequence in context: A143014 A202907 A032261 * A018924 A061582 A175129

Adjacent sequences: A300978 A300979 A300980 * A300982 A300983 A300984

Keyword

nonn,hard,more

Author

Seiichi Manyama, Mar 17 2018

Status

approved