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 A153720 #13 Mar 26 2019 11:47:45 %S A153720 1,5,8,85,911,2921,4491,11543,15724,27683,29921,37276,126659 %N A153720 Numbers k such that the fractional part of (Pi-2)^k is greater than 1-(1/k). %C A153720 Numbers k such that fract((Pi-2)^k) > 1-(1/k), where fract(x) = x-floor(x). %C A153720 The next such number must be greater than 200000. %C A153720 a(14) > 300000. - _Robert Price_, Mar 26 2019 %e A153720 a(3) = 8, since fract((Pi-2)^8) = 0.8846247315... > 0.875 = 1 - (1/8), but fract((Pi-2)^k) = 0.2134..., 0.5268... <= 1 - (1/k) for 6 <= k <= 7. %t A153720 Select[Range[1000], N[FractionalPart[(Pi - 2)^#], 100] > 1 - (1/#) &] (* _G. C. Greubel_, Aug 25 2016 *) %Y A153720 Cf. A153664, A153672, A153680, A153688, A153696, A153704, A153712, A153724, A154130. %K A153720 nonn,more %O A153720 1,2 %A A153720 _Hieronymus Fischer_, Jan 06 2009