A024583 a(n) = floor(n/{n*Pi}), where { } = fractional part.
7, 7, 7, 7, 7, 7, 7, 60, 32, 24, 19, 17, 15, 14, 121, 60, 41, 32, 27, 24, 21, 191, 89, 60, 46, 38, 32, 29, 273, 121, 79, 60, 49, 41, 36, 369, 154, 99, 74, 60, 50, 44, 485, 191, 121, 89, 71, 60, 52, 627, 230, 143, 105, 83, 69, 60, 805, 273, 166, 121, 95, 79, 68, 1033, 319, 191, 137, 108
Offset: 1
Keywords
Links
- Clark Kimberling, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A024584.
Programs
-
Mathematica
Table[Floor[n/FractionalPart[n*Pi]], {n, 70}] (* Clark Kimberling, Aug 18 2012 *)