|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|