[go: up one dir, main page]

login
A134903
a(n) = floor(n*exp(-cos(n))).
12
0, 3, 8, 7, 3, 2, 3, 9, 22, 23, 10, 5, 5, 12, 32, 41, 22, 9, 7, 13, 36, 59, 39, 15, 9, 13, 36, 73, 61, 25, 12, 13, 33, 79, 86, 40, 17, 14, 29, 77, 110, 62, 24, 16, 26, 70, 126, 91, 36, 19, 24, 61, 132, 123, 53, 23, 23, 51, 127
OFFSET
1,2
LINKS
MATHEMATICA
Table[Floor[n * Exp[- Cos[n]]], {n, 70}] (* Vincenzo Librandi, Feb 18 2013 *)
PROG
(Magma) [Floor(n*Exp(-Cos(n))): n in [1..60]]; // Vincenzo Librandi, Feb 18 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Mohammad K. Azarian, Nov 14 2007
EXTENSIONS
Offset corrected by Mohammad K. Azarian, Nov 19 2008
STATUS
approved