OFFSET
1,1
LINKS
FORMULA
Equals e^(e-2)*(4 +(e-2)*e)/2.
EXAMPLE
6.104002341363754151667232902275147659559194262...
MATHEMATICA
u=N[E^(E - 2)*(4 + (E - 2)*E)/2, 100]; First[RealDigits[u]]
N[Mean[Table[Length[NestWhileList[# + RandomReal[1] &, 0, #1 < E &]] - 1, 10^5]]] (* sample mean *) (* Peter J. C. Moses, Apr 30 2024 *)
PROG
(PARI) exp(exp(1)-2)*(4 +(exp(1)-2)*exp(1))/2 \\ Charles R Greathouse IV, Jun 08 2026
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Clark Kimberling, May 01 2024
STATUS
approved
