OFFSET
1,1
FORMULA
a(n) = floor(1/fract((10/9)^A153693(n))), where fract(x) = x-floor(x).
EXAMPLE
a(2)=11 since 1/12 < fract((10/9)^A153693(2)) = fract((10/9)^7) = 0.09075... <= 1/11.
MATHEMATICA
A153693 = {1, 7, 50, 62, 324, 3566, 66877, 108201, 123956, 132891,
182098, 566593, 3501843};
Table[fp = FractionalPart[(10/9)^A153693[[n]]]; m = Floor[1/fp];
While[fp <= 1/m, m++]; m - 1, {n, 1, Length[A153693]}] (* Robert Price, Mar 25 2019 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Hieronymus Fischer, Jan 06 2009
EXTENSIONS
a(12)-a(13) from Robert Price, Mar 25 2019
STATUS
approved