A261457 a(n) = prime(n)! - n!.
1, 4, 114, 5016, 39916680, 6227020080, 355687428090960, 121645100408791680, 25852016738884976277120, 8841761993739701954543612371200, 8222838654177922817725562840083200, 13763753091226345046315979581580901920998400
Offset: 1
Examples
The 3rd prime is 5, a(3)= 5! - 3! = 114.
Programs
-
Magma
[Factorial(NthPrime(n)) - Factorial(n): n in [1..15]]; // Vincenzo Librandi, Aug 20 2015
-
Mathematica
Array[Prime[#]! - #! &, {12}] (* Michael De Vlieger, Aug 19 2015 *)
-
PARI
first(m)=vector(m,i,prime(i)!-i!) \\ Anders Hellström, Aug 20 2015