A134901 - OEIS

%I #12 Sep 08 2022 08:45:32

%S 3,6,3585,1,1,0,32,21,101,1,4,1,140,38,69,0,6,4,15011,59,69,0,7,7,0,

%T 96,76,1122,6,10,2,196,89,225,3,13,7,1109,110,153,0,14,12,

%U 150381952598940947400633733,145,139,153663,13,17,1,226

%N a(n) = floor(n*exp(csc(n))).

%H Vincenzo Librandi, <a href="/A134901/b134901.txt">Table of n, a(n) for n = 1..709</a> (shortened by _N. J. A. Sloane_, Jan 13 2019)

%t Table[Floor[n * Exp[Csc[n]]], {n, 70}] (* _Vincenzo Librandi_, Feb 18 2013 *)

%o (Magma) [Floor(n*Exp(Cosec(n))): n in [1..60]]; // _Vincenzo Librandi_, Feb 18 2013

%Y Cf. A134890; A134891; A134892; A134893; A134894; A134895; A134896; A134897; A134898; A134899; A134900.

%K nonn,easy

%O 1,1

%A _Mohammad K. Azarian_, Nov 14 2007