This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A153704 #11 Mar 23 2019 17:57:55 %S A153704 1,8,19,178,209,1907,32653,119136,220010 %N A153704 Numbers k such that the fractional part of e^k is greater than 1-(1/k). %C A153704 Numbers k such that fract(e^k) > 1-(1/k), where fract(x) = x-floor(x). %C A153704 The next such number must be greater than 100000. %C A153704 a(10) > 300,000. _Robert Price_, Mar 23 2019 %e A153704 a(2)=8, since fract(e^8) = 0.957987... >0.875 = 1-(1/8), but fract(e^k) = 0.389..., 0.085..., 0.598..., 0.413..., 0.428..., 0.633... for 2<=k<=7 which all are less than 1-(1/k). %t A153704 Select[Range[2000], N[FractionalPart[E^#], 1000] >= 1 - (1/#) &] (* _G. C. Greubel_, Aug 25 2016 *) %Y A153704 Cf. A153664, A153672, A153680, A153688, A153696, A153708, A154130, A153712, A153720. %Y A153704 Cf. A000149. %K A153704 nonn,more %O A153704 1,2 %A A153704 _Hieronymus Fischer_, Jan 06 2009 %E A153704 a(8)-a(9) from _Robert Price_, Mar 23 2019