A267897 a(n) = prime(n)! - prime(n).

0, 3, 115, 5033, 39916789, 6227020787, 355687428095983, 121645100408831981, 25852016738884976639977, 8841761993739701954543615999971, 8222838654177922817725562879999969, 13763753091226345046315979581580902399999963

Offset

1,2

Links

Table of n, a(n) for n=1..12.

Formula

a(n) = A039716(n) - A000040(n).

a(n) = A005096(A000040(n)).

Mathematica

Array[Prime[#]! - Prime[#] &, 20]

Prog

(Magma) [Factorial(p)-p: p in PrimesUpTo(40)];
(PARI) lista(nn) = forprime(p=2, nn, print1(p! - p, ", ")); \\ Altug Alkan, Jan 23 2016

Crossrefs

Cf. A000040, A005096, A039716, A114574.

Sequence in context: A225334 A240441 A229929 * A132304 A097642 A009095

Adjacent sequences: A267894 A267895 A267896 * A267898 A267899 A267900

Keyword

nonn,easy

Author

Vincenzo Librandi, Jan 22 2016

Status

approved