A153707 Greatest number m such that the fractional part of e^A091560(m) >= 1-(1/m).
3, 23, 27, 41, 59, 261, 348, 2720, 3198, 6064, 72944, 347065
Offset: 1
Examples
a(2)=23, since 1-(1/24) = 0.9583...> fract(e^A091560(2)) = fract(e^8) = 0.95798.. >= 0.95652... >= 1-(1/23).
Programs
-
Mathematica
$MaxExtraPrecision = 100000; A091560 = {1,8,19,76,166,178,209,1907,20926,22925,32653,119136}; Floor[1/(1-FractionalPart[E^A091560])] (* Robert Price, Apr 18 2019 *)
Formula
a(n):=floor(1/(1-fract(e^A091560(n)))), where fract(x) = x-floor(x).
Extensions
a(12) from Robert Price, Apr 18 2019