A134907 a(n) = floor(n*exp(-tan(n))).

0, 17, 3, 1, 146, 8, 2, 7180, 14, 5, 1481148085628412373142705746959543003289563510386989143402672337886302490562710486232930994662688987, 22, 8, 0, 35, 11, 0, 56, 16, 2, 96, 21, 4, 202, 28, 7

Offset

1,2

Links

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

Mathematica

Table[Floor[n Exp[-Tan[n]]], {n, 30}] (* Vincenzo Librandi, Feb 18 2013 *)

Crossrefs

Cf. A134890, A134891, A134892, A134902, A134903, A134904, A134905, A134906.

Sequence in context: A321261 A367604 A040280 * A040281 A157115 A089570

Adjacent sequences: A134904 A134905 A134906 * A134908 A134909 A134910

Keyword

nonn,easy

Author

Mohammad K. Azarian, Nov 14 2007

Extensions

Offset corrected by Mohammad K. Azarian, Nov 19 2008

a(11) corrected by Vincenzo Librandi, Feb 18 2013

Status

approved