login
A172445
a(1) = 1, and for each k >=2, a(k) is the smallest number n such that n/sin(n) > a(k)/sin(a(k)), so that a(1)/sin(a(1)) > a(2)/sin(a(2)) > ... > a(k)/sin(a(k)) > ...
2
1, 4, 6, 12, 16, 22, 66, 110, 154, 198, 201, 245, 289, 333, 355, 1065, 1775, 2485, 3195, 3905, 4615, 5325, 6035, 6745, 7455, 8165, 8875, 9585, 10295, 11005, 11715, 12425, 13135, 13845, 14555, 15265, 15975, 16685, 17395, 18105, 18815, 19525, 20235
OFFSET
1,2
REFERENCES
J.-M. De Koninck, Ces nombres qui nous fascinent, Entry 83, p. 29, Ellipses, Paris 2008. Also Entry 137, p. 47.
LINKS
EXAMPLE
1/sin(1) = 1.1883951..., 4/sin(4) = -5.285394..., 6/sin(6) = -21,473397...
MAPLE
a:= evalf(1/sin(1)); for n from 2 to 10000000 do; if a > evalf(n/sin(n)) then a:= evalf(n/sin(n)); print(n); else fi ; od;
MATHEMATICA
s = {1}; rm = 1/Sin[1]; Do[r = n/Sin[n]; If[r < rm, rm = r; AppendTo[s, n]], {n, 2, 10^4}]; s (* Amiram Eldar, Aug 11 2019 *)
CROSSREFS
Sequence in context: A310597 A310598 A024904 * A274221 A327479 A139056
KEYWORD
nonn
AUTHOR
Michel Lagneau, Feb 03 2010
STATUS
approved