A195911 a(n) = ceiling(cot(n)).

1, 0, -7, 1, 0, -3, 2, 0, -2, 2, 0, -1, 3, 1, -1, 4, 1, 0, 7, 1, 0, 113, 1, 0, -7, 1, 0, -3, 2, 0, -2, 2, 0, -1, 3, 1, -1, 4, 1, 0, 7, 1, 0, 57, 1, 0, -8, 1, 0, -3, 2, 0, -2, 2, 0, -1, 3, 1, -1, 4, 1, 0, 6, 1, 0, 38, 1, 0, -8, 1, 0, -3, 2, 0, -2, 2, 0, -1, 3

Offset

1,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Table[Ceiling[Cot[n]], {n, 100}] (* T. D. Noe, Mar 16 2012 *)

Prog

(PARI) a(n)=ceil(1/tan(n)) \\ Charles R Greathouse IV, Feb 07 2013
(Magma) [Ceiling(1/Tan(n)): n in [1..80]]; // Vincenzo Librandi, Feb 16 2013

Crossrefs

Cf. A195910, A000503, A037448, A005657, A000493, A000480, A000494, A000484.

Sequence in context: A197037 A256778 A218620 * A231096 A240907 A179376

Adjacent sequences: A195908 A195909 A195910 * A195912 A195913 A195914

Keyword

sign,easy

Author

Mohammad K. Azarian, Mar 15 2012

Status

approved