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
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
Magma
[Ceiling(n*Exp(-Cos(n))): n in [1..60]]; // Vincenzo Librandi, Feb 18 2013
-
Mathematica
Table[Ceiling[n Exp[-Cos[n]]], {n, 60}] (* Vincenzo Librandi, Feb 18 2013 *)