A134902 Ceiling(n*exp(-cos(n))).

1, 4, 9, 8, 4, 3, 4, 10, 23, 24, 11, 6, 6, 13, 33, 42, 23, 10, 8, 14, 37, 60, 40, 16, 10, 14, 37, 74, 62, 26, 13, 14, 34, 80, 87, 41, 18, 15, 30, 78, 111, 63, 25, 17, 27, 71, 127, 92, 37, 20, 25, 62, 133, 124, 54, 24, 24, 52, 128

Offset

1,2

Links

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

Mathematica

Table[Ceiling[n Exp[-Cos[n]]], {n, 60}] (* Vincenzo Librandi, Feb 18 2013 *)

Prog

(Magma) [Ceiling(n*Exp(-Cos(n))): n in [1..60]]; // Vincenzo Librandi, Feb 18 2013

Crossrefs

Cf. A134890, A134891, A134892, A134893, A134894, A134895, A134896, A134897, A134898, A134899, A134900, A134901.

Sequence in context: A328229 A366174 A198548 * A110992 A199203 A370565

Adjacent sequences: A134899 A134900 A134901 * A134903 A134904 A134905

Keyword

nonn,easy

Author

Mohammad K. Azarian, Nov 14 2007

Status

approved