OFFSET
1,1
EXAMPLE
a(5) = 2761 because 2761 = 11 * 251 , and 251 - 11 = 240 = 2*120 = 2*5!
MATHEMATICA
f[n_] := Block[{p=3}, While[! PrimeQ[p+2*n!], p=NextPrime[p]]; p (p + 2*n!)]; Table[f[n], {n, 60}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, May 16 2011
STATUS
approved