A080053 Exp(n) is further from an integer than any previous exp(k) for 1 <= k < n.

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

Links

Table of n, a(n) for n=1..28.

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

Adjacent sequences: A080050 A080051 A080052 * A080054 A080055 A080056

Keyword

nonn

Author

Robert G. Wilson v, Jan 20 2003

Extensions

a(25)-a(28) from Martin Schlueter, Feb 08 2014

Status

approved