A154662 Numbers k such that k! +- 367 are primes.

6, 7, 13, 17, 20, 69

Offset

1,1

Comments

No further terms since 367 divides k! + 367 for all k >= 367. - Michael S. Branicky, Jul 20 2025

Links

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

Example

7 is a term since 7! - 367 = 4673, prime, and 7! + 367 = 5407, prime.

Mathematica

lst={}; a=367; Do[If[PrimeQ[n!-a]&&PrimeQ[n!+a], AppendTo[lst, n]], {n, 2*5!}]; lst
Select[Range[70], AllTrue[#!+{367, -367}, PrimeQ]&] (* Harvey P. Dale, Jul 19 2025 *)

Crossrefs

Cf. A144046, A154660, A154661.

Sequence in context: A047335 A182623 A127020 * A379477 A277567 A070398

Adjacent sequences: A154659 A154660 A154661 * A154663 A154664 A154665

Keyword

nonn,fini,full

Author

Vladimir Joseph Stephan Orlovsky, Jan 13 2009

Status

approved