|
| |
|
|
A118913
|
|
Primes of the form n! + (n+1)! + 1.
|
|
7
| | |
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| a(2) = 3! + 4! + 1 = 6 + 24 + 1 = 31
a(3) = 7! + 8! + 1 = 5040 + 40320 + 1 = 45361
|
|
|
MAPLE
| P:=proc(n) local i, j; for i from 1 by 1 to n do j:=i!+(i+1)!+1; if isprime(j) then print(j); fi; od; end: P(200);
|
|
|
MATHEMATICA
| lst={}; Do[p=n!+(n+1)!+1; If[PrimeQ[p], AppendTo[lst, p]], {n, 0, 5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jan 27 2009]
|
|
|
PROG
| (PARI) for(n=0, 1e3, if(isprime(k=n!+(n+1)!+1), print1(k", "))) \\ Charles R Greathouse IV, Feb 14 2011
|
|
|
CROSSREFS
| Indices in A087147 [From Dmitry Kamenetsky (dkamen(AT)rsise.anu.edu.au), Oct 21 2008]
Sequence in context: A002707 A144964 A168678 * A005042 A136582 A173649
Adjacent sequences: A118910 A118911 A118912 * A118914 A118915 A118916
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Paolo P. Lava and Giorgio Balzarotti (paoloplava(AT)gmail.com), May 25 2006
|
|
|
EXTENSIONS
| Added the first term, because 0!+1!+1=3 is prime. Dmitry Kamenetsky (dkamen(AT)rsise.anu.edu.au), Oct 21 2008
|
| |
|
|
