A000493 a(n) = floor(sin(n)).

0, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0, 0, -1, -1, -1, 0, 0

Offset: 0

Author

N. J. A. Sloane

Keywords

• sign
• easy

Links

• Robert Israel, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A032615, A126564 (even bisection), A000480 (floor cos(n)).

Programs

Magma

[Floor(Sin(n)): n in [0..100]]; // Vincenzo Librandi, Jun 15 2015

Maple

f := n->floor(evalf(sin(n)));

Mathematica

f[ n_ ] := Floor[ N[ Sin[ n ] ] ]
Floor[Sin[Range[0,90]]] (* Harvey P. Dale, Dec 04 2012 *)

Formula

a(n) = -(A032615(n) mod 2). - Robert Israel, Jun 14 2015