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

6, 7, 13, 17, 20, 69

Offset

1,1

Comments

7!-367=4673, 7!+367=6407,...

Links

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

Mathematica

lst={}; a=367; Do[If[PrimeQ[n!-a]&&PrimeQ[n!+a], AppendTo[lst, n]], {n, 2*5!}]; lst

Crossrefs

Cf. A144046, A154660, A154661

Sequence in context: A047335 A182623 A127020 * A277567 A070398 A022096

Adjacent sequences: A154659 A154660 A154661 * A154663 A154664 A154665

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jan 13 2009

Status

approved