A263482 Numbers k such that k! + 2^k + 11 or k! + 2^k - 11 is prime.

0, 2, 3, 4, 5, 6, 7, 9, 15, 34, 41, 79, 99, 379, 2183

Offset

1,2

Comments

Is there some k such that k! + 2^k + 11 and k! + 2^k - 11 are prime?

Links

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

Example

For k = 0, k! + 2^k + 11 = 0! + 2^0 + 11 = 13, which is prime.
For k = 3, k! + 2^k - 11 = 3! + 2^3 - 11 = 3, which is prime.

Mathematica

Select[Range[0, 400], Or[PrimeQ[#! + 2^# + 11], PrimeQ[#! + 2^# - 11]] &] (* Michael De Vlieger, Nov 17 2015 *)
Select[Range[0, 500], AnyTrue[#!+2^#+{11, -11}, PrimeQ]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 05 2019 *)

Prog

(PARI) for(n=0, 1e3, if(isprime(n!+2^n-11) || isprime(n!+2^n+11), print1(n", ")))
(PARI) is(n)=my(N=n!+2^n); ispseudoprime(N-11) || ispseudoprime(N+11) \\ Charles R Greathouse IV, Nov 17 2015

Crossrefs

Cf. A007611, A261714, A263469.

Sequence in context: A033072 A030287 A271950 * A030153 A039126 A083376

Adjacent sequences: A263479 A263480 A263481 * A263483 A263484 A263485

Keyword

nonn,more

Author

Altug Alkan, Oct 19 2015

Extensions

a(14) from Charles R Greathouse IV, Nov 17 2015

a(15) from Michael S. Branicky, Jun 17 2023

Status

approved