|
%I #12 Sep 08 2022 08:45:32
%S 1,1,0,9,3,0,22,6,0,46,10,2,112,16,4,445,22,7,13921,31,10,
%T 254720877109456038162413915231807280097784507656380,43,15,0,60,19,0,
%U 89,25,3,145,32,6,288,40,11,953,51,16,20702,64,22
%N Floor(n*exp(cot n)).
%H Vincenzo Librandi, <a href="/A134897/b134897.txt">Table of n, a(n) for n = 1..299</a>
%t Table[Floor[n Exp[Cot[n]]], {n, 50}] (* _Vincenzo Librandi_, Feb 08 2013 *)
%o (Magma) [Floor(n*Exp(Cot(n))): n in [1..50]]; // _Vincenzo Librandi_, Feb 08 2013
%Y Cf. A134890; A134891; A134892; A134893; A134894; A134895; A134896.
%K nonn
%O 1,4
%A _Mohammad K. Azarian_, Nov 14 2007
|
