OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
FORMULA
9!*a(n) are terms in A014574.
MATHEMATICA
s={}; Do[m=362880k; If[PrimeQ[m-1]&&PrimeQ[m+1], AppendTo[s, k]], {k, 1000}]; s
With[{c=9!}, Select[Range[1000], And@@PrimeQ[c*#+{1, -1}]&]] (* Harvey P. Dale, Aug 27 2013 *)
PROG
(Magma) [m:m in [1..1000]| IsPrime(Factorial(9)*m+1) and IsPrime(Factorial(9)*m-1)]; // Marius A. Burtea, Dec 29 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Apr 03 2007
STATUS
approved