OFFSET
1,1
FORMULA
a(n) = n! + A085747(n).
MATHEMATICA
lsn[n_]:=Module[{sp=n!+1}, While[PrimeOmega[sp]!=2, sp++]; sp]; Array[lsn, 25] (* Harvey P. Dale, Mar 30 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Ray Chandler, Nov 09 2003
EXTENSIONS
Better name, more terms from Jinyuan Wang, Jul 31 2021
STATUS
approved