OFFSET
1,2
MAPLE
a := n -> add(ithprime(k), k=1..n)!/mul(ithprime(k)!, k=1..n);
seq(a(n), n=0..9); # Peter Luschny, Nov 04 2014
PROG
(PARI) a(n) = my(d=1, t=0); forprime(p=2, prime(n), d*=p!; t+=p); t!\d
CROSSREFS
KEYWORD
nonn
AUTHOR
Franklin T. Adams-Watters, Nov 03 2014
STATUS
approved