A000480 a(n) = floor(cos(n)).

1, 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, 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

Offset: 0

Author

N. J. A. Sloane

Keywords

• sign
• easy

Programs

Magma

[Floor(Cos(n)): n in [0..100]]; // Wesley Ivan Hurt, Apr 21 2021

Maple

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

Mathematica

Table[Floor[Cos[n]], {n, 0, 100}]