OFFSET
1,2
EXAMPLE
1.979770633068...
MATHEMATICA
primorial[n_?Positive] := Product[Prime[i], {i, 1, n}];
RealDigits[1 + Sum[i!!/primorial[i], {i, 1, 500}], 10, 107][[1]]
CROSSREFS
KEYWORD
AUTHOR
Marco Ripà, Nov 12 2022
STATUS
approved