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

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

Offset: 1

Author

Vincenzo Librandi, Jan 22 2016

Keywords

• nonn
• easy

Crossrefs

Cf. A000040, A005095, A039716, A114574.

Programs

Magma

[Factorial(p)+p: p in PrimesUpTo(40)];

Mathematica

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

PARI

lista(nn) = forprime(p=2, nn, print1(p! + p, ", ")); \\ Altug Alkan, Jan 23 2016

Formula

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

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