OFFSET
1,1
FORMULA
a(n) = floor(1/(1-fract((3/2)^A153664(n)))), where fract(x) = x-floor(x).
EXAMPLE
a(2)=14, since 1-(1/15)=0.933...>fract((3/2)^A153664(2))=fract((3/2)^14)=0.929...>=1-(1/14).
MATHEMATICA
A153664 = {1, 14, 163, 1256, 2677, 8093, 49304, 49305, 158643, 164000, 835999, 2242294, 2242295, 2242296, 3965133, 25380333, 92600006, 92600007, 92600008, 92600009, 92600010, 92600011, 9267816, 125040717, 125040718};
Table[fp = FractionalPart[(3/2)^A153664[[n]]]; m = Floor[1/(1 - fp)];
While[fp >= 1 - (1/m), m++]; m - 1, {n, 1, Length[A153664]}] (* Robert Price, Mar 26 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Hieronymus Fischer, Dec 31 2008
EXTENSIONS
a(11)-a(25) from Robert Price, May 10 2012
STATUS
approved