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 A153667 #13 Mar 26 2019 19:20:19
%S A153667 2,2,2,2,3,14,31,33,69,137,222,318,901,1772,2747,12347,16540,18198,
%T A153667 135794,222246,570361,2134829,6901329,75503109,814558605
%N A153667 Greatest number m such that the fractional part of (3/2)^A153663(n) >= 1-(1/m).
%F A153667 a(n) = floor(1/(1-fract((3/2)^A153663(n)))), where fract(x) = x-floor(x).
%e A153667 a(5)=3, since 1-(1/4)=0.75>fract((3/2)^A153663(5))=fract((3/2)^12)=0.746...>=1-(1/3).
%t A153667 A153663 = {1, 5, 8, 10, 12, 14, 46, 58, 105, 157, 163, 455, 1060, 1256, 2677, 8093, 28277, 33327, 49304, 158643, 164000, 835999, 2242294, 25380333, 92600006};
%t A153667 Table[fp = FractionalPart[(3/2)^A153663[[n]]]; m = Floor[1/(1-fp)];
%t A153667 While[fp >= 1 - (1/m), m++]; m - 1, {n, 1, Length[A153663]}] (* _Robert Price_, Mar 26 2019 *)
%Y A153667 Cf. A002379, A081464, A153662, A153663, A153664, A153665, A153666, A153668.
%K A153667 nonn,more
%O A153667 1,1
%A A153667 _Hieronymus Fischer_, Dec 31 2008
%E A153667 a(22)-a(25) from _Robert Price_, May 10 2012