A000494 Nearest integer to sin(n).

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

Offset: 0

Author

N. J. A. Sloane

Keywords

• sign
• easy
• nice

Links

• T. D. Noe, Table of n, a(n) for n = 0..1000

Programs

Maple

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

Mathematica

Array[ Round[ Sin[ # ] // N ]&, 90, 0 ]
Round[Sin[Range[0,100]]] (* Harvey P. Dale, Jul 11 2025 *)