login
A134894
Ceiling(n*exp(tan n)).
9
5, 1, 3, 13, 1, 5, 17, 1, 6, 20, 1, 7, 21, 19608, 7, 22, 560, 6, 23, 188, 5, 23, 113, 3, 22, 85, 2, 22, 71, 1, 20, 62, 1, 19, 57, 83616, 16, 52, 1449, 14, 49, 416, 10, 45, 228, 6, 42, 160, 3, 39, 126, 1, 35, 106, 1, 31, 93, 240699
OFFSET
1,1
LINKS
MAPLE
A134894:=n->ceil(n*exp(tan(n))): seq(A134894(n), n=1..100); # Wesley Ivan Hurt, Nov 20 2014
MATHEMATICA
Table[Ceiling[n * Exp[Tan[n]]], {n, 100}] (* Vincenzo Librandi, Feb 18 2013 *)
PROG
(Magma) [Ceiling(n*Exp(Tan(n))): n in [1..60]]; // Vincenzo Librandi, Feb 18 2013
(PARI) a(n)=ceil(n*exp(tan(n))) \\ Charles R Greathouse IV, Nov 21 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Mohammad K. Azarian, Nov 14 2007
STATUS
approved