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

Links

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

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 *)

Crossrefs

Sequence in context: A102283 A128834 A022928 * A022933 A194683 A306710

Adjacent sequences: A000491 A000492 A000493 * A000495 A000496 A000497

Keyword

sign,easy,nice

Author

N. J. A. Sloane

Status

approved