|
|
A153666
|
|
Greatest number m such that the fractional part of (3/2)^A153662(n) <= 1/m.
|
|
9
|
|
|
2, 4, 16, 11, 16799, 11199, 5536, 92694, 61796, 41197, 23242, 55710, 137921, 257825, 5271294, 706641581, 471094387, 314062925
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
a(n):=floor(1/fract((3/2)^A153662(n))), where fract(x) = x-floor(x).
|
|
EXAMPLE
|
a(3)=16 since 1/17<fract((3/2)^A153662(3))=fract((3/2)^4)=0.0625=1/16.
|
|
MATHEMATICA
|
A153662 = {1, 2, 4, 7, 3328, 3329, 4097, 12429, 12430, 12431, 18587, 44257, 112896, 129638, 4264691, 144941960, 144941961, 144941962};
Table[fp = FractionalPart[(3/2)^A153662[[n]]]; m = Floor[1/fp];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|