login
A080053
Exp(n) is further from an integer than any previous exp(k) for 1 <= k < n.
3
1, 2, 4, 5, 6, 10, 16, 21, 85, 115, 118, 136, 169, 177, 346, 1272, 2624, 8823, 12504, 13863, 36507, 51099, 63179, 111473, 143325, 153014, 255220, 476129
OFFSET
1,2
EXAMPLE
Exp(4) = 54.59815... is closer to an integer than exp(2) = 7.389056... but not exp(3) = 20.085536...
The discrepancy at 111473 is 0.499991807891326554242475...
MATHEMATICA
a = 0; Do[ d = Abs[ Round[E^n] - N[E^n, Ceiling[ Log[10, E^n] + 10]]]; If[d > a, Print[n]; a = d], {n, 1, 1000000}]
CROSSREFS
Cf. A079490.
Sequence in context: A219046 A043045 A091678 * A101964 A294812 A217354
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jan 20 2003
EXTENSIONS
a(25)-a(28) from Martin Schlueter, Feb 08 2014
STATUS
approved