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

Author

Hieronymus Fischer, Jan 06 2009

Keywords

• nonn
• more

Examples

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

Crossrefs

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

Programs

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 *)

Formula

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

Extensions

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