A151913 Numbers n for which (8+n!)/8 is prime.
7, 9, 10, 12, 14, 20, 23, 24, 29, 44, 108, 2049, 3072, 4862, 8807, 15089
Offset: 1
Keywords
Crossrefs
For primes of the form (8+k!!)/8 see A139066.
Programs
-
Mathematica
a = {}; Do[If[PrimeQ[(n! + 8)/8], AppendTo[a, n]], {n, 1, 500}]; a
-
PARI
is(n)=n>6 && isprime((8+n!)/8) \\ Charles R Greathouse IV, Apr 29 2016
Extensions
Definition corrected Feb 24 2010
More terms from Serge Batalov, Feb 18 2015
a(15)-a(16) from Robert Price, Dec 20 2016
Comments