OFFSET
1,1
MAPLE
A039716 := proc(n) factorial(ithprime(n)) ; end: A139193 := proc(n) A039716(n)/5-1 ; end: seq(A139193(n), n=3..14) ; # R. J. Mathar, Sep 18 2009
MATHEMATICA
Table[(Prime[n]! - 5)/5, {n, 3, 20}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Apr 11 2008
STATUS
approved