A224995 Floor(1/f(x^(1/n))) for x = 3/2, where f computes the fractional part.
2, 4, 6, 9, 11, 14, 16, 19, 21, 24, 26, 29, 31, 34, 36, 38, 41, 43, 46, 48, 51, 53, 56, 58, 61, 63, 66, 68, 71, 73, 75, 78, 80, 83, 85, 88, 90, 93, 95, 98, 100, 103, 105, 108, 110, 112, 115, 117, 120, 122, 125, 127, 130, 132, 135, 137, 140, 142, 145, 147, 149
Offset: 1
Links
- Melvyn B. Nathanson, On the fractional parts of roots of positive real numbers, Amer. Math. Monthly, 120 (2013), 409-429.
Programs
-
Mathematica
th = 3/2; t = Table[Floor[1/FractionalPart[th^(1/n)]], {n, 100}]
Formula
a(n) = floor(n/log(3/2)-1/2) for n>1. - Andrey Zabolotskiy, Dec 01 2017