

A153662


Numbers k such that the fractional part of (3/2)^k is less than 1/k.


22



1, 2, 4, 7, 3328, 3329, 4097, 12429, 12430, 12431, 18587, 44257, 112896, 129638, 4264691, 144941960, 144941961, 144941962
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

Numbers k such that fract((3/2)^k) < 1/k, where fract(x) = xfloor(x).
The next term is greater than 3*10^8.


LINKS

Table of n, a(n) for n=1..18.


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

Cf. A002379, A081464, A153663, A153664, A153665, A153666, A153667, A153668.
Sequence in context: A076719 A103009 A174393 * A222011 A063864 A186036
Adjacent sequences: A153659 A153660 A153661 * A153663 A153664 A153665


KEYWORD

nonn,more


AUTHOR

Hieronymus Fischer, Dec 31 2008


EXTENSIONS

a(15)a(18) from Robert Gerbicz, Nov 21 2010


STATUS

approved



