|
Search: id:A089130
|
|
|
| A089130 |
|
Primes of the form (n!+2)/2. |
|
+0
45
|
|
| 2, 13, 61, 2521, 20161, 3113510401, 10461394944001, 132626429906095529318154240000001, 30207631531686917818677566034256998753632256000000001
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
s=""; For[i=1, i<5^2, If[PrimeQ[(i!+2)/2], s=s<>ToString[(i!+2)/2]<>", "]; i++ ]; Print[s] (from Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 29 2008)
|
|
PROGRAM
|
(PARI) nfactp2d2(n) = { for(x=1, n, y=floor((x!+ 2)/2); if(isprime(y), print1(y", ")) ) }
|
|
CROSSREFS
|
Cf. A082672.
Sequence in context: A048502 A144235 A042061 this_sequence A081340 A127531 A037745
Adjacent sequences: A089127 A089128 A089129 this_sequence A089131 A089132 A089133
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Cino Hilliard (hillcino368(AT)gmail.com), Dec 05 2003
|
|
|
Search completed in 0.002 seconds
|
