A051509 a(n) = round(Sum_{k=0..n} tan(k)).

0, 2, -1, -1, 0, -3, -3, -2, -9, -10, -9, -235, -236, -235, -228, -229, -228, -225, -226, -226, -224, -225, -225, -224, -226, -226, -225, -228, -228, -227, -234, -234, -234, -309, -310, -309, -301, -302, -302, -298, -299, -299, -297, -298, -298, -297, -299, -299, -298, -301, -301, -300, -306

Offset

0,2

Links

Table of n, a(n) for n=0..52.

Mathematica

Floor[#+1/2]&/@Accumulate[Tan[Range[0, 60]]] (* Harvey P. Dale, Jun 02 2012 *)

Crossrefs

Sequence in context: A133830 A316632 A111571 * A124816 A238349 A318754

Adjacent sequences: A051506 A051507 A051508 * A051510 A051511 A051512

Keyword

sign

Author

N. J. A. Sloane

Status

approved