OFFSET
1,1
COMMENTS
Subsequence of A000142.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..88
FORMULA
Sum_{n>=1} 1/a(n) = A100124. - Amiram Eldar, Nov 13 2020
MAPLE
MATHEMATICA
Table[Prime[n]!, {n, 1, 8}] (* Vladimir Joseph Stephan Orlovsky, Apr 27 2008 *)
PROG
(Sage)
BB = primes_first_n(14)
L = []
for i in range(13):
L.append(factorial(BB[i]))
L # Zerinvary Lajos, May 14 2007
(PARI) a(n)=prime(n)! \\ Charles R Greathouse IV, Feb 07 2012
(Magma) [Factorial(NthPrime(n)): n in [1..20]]; // Vincenzo Librandi, Apr 21 2014
CROSSREFS
KEYWORD
nonn,easy,nice
AUTHOR
STATUS
approved