%I #10 Dec 02 2017 08:40:39
%S 7,1,2,3,3,4,5,6,7,8,9,9,10,11,12,13,14,15,16,16,17,18,19,20,21,22,23,
%T 23,24,25,26,27,28,29,30,30,31,32,33,34,35,36,37,37,38,39,40,41,42,43,
%U 44,44,45,46,47,48,49,50,51,51,52,53,54,55,56,57,58,58
%N Floor(1/f(x^(1/n))) for x = Pi, where f computes the fractional part.
%H Melvyn B. Nathanson, <a href="http://dx.doi.org/10.4169/amer.math.monthly.120.05.409">On the fractional parts of roots of positive real numbers</a>, Amer. Math. Monthly, 120 (2013), 409-429.
%F a(n) = floor(n/log(Pi)-1/2) for n>4. - _Andrey Zabolotskiy_, Dec 01 2017
%t th = Pi; t = Table[Floor[1/FractionalPart[th^(1/n)]], {n, 100}]
%Y Cf. A224995, A224996, A224997, A001651, A047211, A047203, A047290, A047332.
%K nonn,easy
%O 1,1
%A _T. D. Noe_, Apr 26 2013
|