A267898 a(n) = prime(n)! + prime(n).

4, 9, 125, 5047, 39916811, 6227020813, 355687428096017, 121645100408832019, 25852016738884976640023, 8841761993739701954543616000029, 8222838654177922817725562880000031, 13763753091226345046315979581580902400000037

Offset

1,1

Links

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

Formula

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

a(n) = A005095(A000040(n)).

Mathematica

Array[Prime[#]! + Prime[#]&, 20]
#!+#&/@Prime[Range[20]] (* Harvey P. Dale, Aug 04 2016 *)

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, A005095, A039716, A114574.

Sequence in context: A065379 A063783 A168138 * A324981 A128524 A027451

Adjacent sequences: A267895 A267896 A267897 * A267899 A267900 A267901

Keyword

nonn,easy

Author

Vincenzo Librandi, Jan 22 2016

Status

approved