|
|
A118913
|
|
Primes of the form n! + (n+1)! + 1.
|
|
7
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
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
|
Select[Total[#]+1&/@Partition[Range[0, 300]!, 2, 1], PrimeQ] (* Harvey P. Dale, May 30 2016 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
First term inserted (because 0! + 1! + 1 = 3 is prime) by Dmitry Kamenetsky, Oct 21 2008
|
|
STATUS
|
approved
|
|
|
|