%I #11 Sep 08 2022 08:45:32
%S 2,2,2,3,7,16,15,7,4,5,12,28,33,17,8,7,13,35,52,31,13,9,14,37,68,50,
%T 21,11,14,36,78,74,33,15,15,32,80,99,51,21,16,29,75,120,77,30,18,26,
%U 67,132,108,45,22,24,57,132,141,66,28
%N Ceiling(n*exp(cos n)).
%H Vincenzo Librandi, <a href="/A134890/b134890.txt">Table of n, a(n) for n = 1..1000</a>
%t Table[Ceiling[n Exp[Cos[n]]], {n, 60}] (* _Vincenzo Librandi_, Feb 08 2013 *)
%o (Magma) [Ceiling(n*Exp(Cos(n))): n in [1..60]]; // _Vincenzo Librandi_, Feb 08 2013
%o (PARI) a(n)=ceil(n*exp(cos(n))) \\ _Charles R Greathouse IV_, Jul 01 2013
%K nonn
%O 1,1
%A _Mohammad K. Azarian_, Nov 14 2007
|