A134897 Floor(n*exp(cot n)).

1, 1, 0, 9, 3, 0, 22, 6, 0, 46, 10, 2, 112, 16, 4, 445, 22, 7, 13921, 31, 10, 254720877109456038162413915231807280097784507656380, 43, 15, 0, 60, 19, 0, 89, 25, 3, 145, 32, 6, 288, 40, 11, 953, 51, 16, 20702, 64, 22

Offset

1,4

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..299

Mathematica

Table[Floor[n Exp[Cot[n]]], {n, 50}] (* Vincenzo Librandi, Feb 08 2013 *)

Prog

(Magma) [Floor(n*Exp(Cot(n))): n in [1..50]]; // Vincenzo Librandi, Feb 08 2013

Crossrefs

Cf. A134890; A134891; A134892; A134893; A134894; A134895; A134896.

Sequence in context: A302716 A198546 A160579 * A010159 A097528 A065416

Adjacent sequences: A134894 A134895 A134896 * A134898 A134899 A134900

Keyword

nonn

Author

Mohammad K. Azarian, Nov 14 2007

Status

approved