A153689 Greatest number m such that the fractional part of (11/10)^A153685(n) <= 1/m.

10, 18, 253, 618, 6009, 6767, 21386, 697723, 4186162, 31102351

Offset

1,1

Links

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

Formula

a(n) = floor(1/fract((11/10)^A153685(n))), where fract(x) = x-floor(x).

Example

a(2)=18 since 1/19 < fract((11/10)^A153685(2)) = fract((11/10)^17) = 0.0544... <= 1/18.

Mathematica

A153685 = {1, 17, 37, 237, 599, 615, 6638, 13885, 1063942, 9479731};
Table[fp = FractionalPart[(11/10)^A153685[[n]]]; m = Floor[1/fp];
While[fp <= 1/m, m++]; m - 1, {n, 1, Length[A153685]}] (* Robert Price, Mar 25 2019 *)

Crossrefs

Cf. A081464, A153669, A153677, A153685, A154130, A153697, A153705, A153713, A153721.

Sequence in context: A177172 A358985 A171767 * A240022 A378918 A264386

Adjacent sequences: A153686 A153687 A153688 * A153690 A153691 A153692

Keyword

nonn,more

Author

Hieronymus Fischer, Jan 06 2009

Extensions

a(9)-a(10) from Robert Price, Mar 25 2019

Status

approved