|
|
A261523
|
|
a(n) = prime(n+1)! / (prime(n+1) - prime(n))!.
|
|
1
|
|
|
6, 60, 2520, 1663200, 3113510400, 14820309504000, 60822550204416000, 1077167364120207360000, 12280224991305141603532800000, 4111419327088961408862781440000000, 19116323737814368119883304974417920000000, 1393855275548491962840419252226697986048000000000, 30207631531686917818677566034256998753632256000000000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
a(n) = prime(n+1)! / (prime(n+1) - prime(n))! = A058077(n) * A039716(n).
|
|
MAPLE
|
|
|
MATHEMATICA
|
Table[Prime[i + 1]!/(Prime[i + 1] - Prime[i])!, {i, 15}] (* Vincenzo Librandi, Aug 23 2015 *)
|
|
PROG
|
(PARI) vector( 15, n, prime(n+1)! / (prime(n+1) - prime(n))! )
(PARI) vector( 15, n, binomial(prime(n+1), prime(n)) * prime(n)! )
(Magma) [Factorial(NthPrime(n+1)) / Factorial((NthPrime(n+1) - NthPrime(n))): n in [1..15]]; // Vincenzo Librandi, Aug 23 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|