A134904 Ceiling(n*exp(-sin(n))).
1, 1, 3, 9, 14, 8, 4, 3, 6, 18, 30, 21, 9, 6, 8, 22, 45, 39, 17, 9, 10, 23, 54, 60, 29, 13, 11, 22, 57, 81, 47, 19, 13, 21, 54, 98, 71, 29, 15, 19, 49, 106, 99, 44, 20, 19, 42, 104, 128, 66, 27, 20, 36, 95, 150, 95, 37, 22, 32
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[Ceiling(n*Exp(-Sin(n))): n in [1..60]]; // Vincenzo Librandi, Feb 18 2013
-
Mathematica
Table[Ceiling[n Exp[-Sin[n]]], {n, 60}] (* Vincenzo Librandi, Feb 18 2013 *)