OFFSET
1,2
COMMENTS
Numbers k such that fract((3/2)^k) < 1/k, where fract(x) = x-floor(x).
The next term is greater than 3*10^8.
EXAMPLE
a(4) = 7 since fract((3/2)^7) = 0.0859375 < 1/7, but fract((3/2)^5) = 0.59375 >= 1/5 and fract((3/2)^6) = 0.390625 >= 1/6.
MATHEMATICA
Select[Range[1000], FractionalPart[(3/2)^#] < (1/#) &] (* G. C. Greubel, Aug 24 2016 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Hieronymus Fischer, Dec 31 2008
EXTENSIONS
a(15)-a(18) from Robert Gerbicz, Nov 21 2010
STATUS
approved