A134896 Ceiling(n*exp(cot n)).

2, 2, 1, 10, 4, 1, 23, 7, 1, 47, 11, 3, 113, 17, 5, 446, 23, 8, 13922, 32, 11, 254720877109456038162413915231807280097784507656381, 44, 16, 1, 61, 20, 1, 90, 26, 4, 146, 33, 7, 289, 41, 12, 954, 52, 17, 20703, 65, 23, 149056697284764410227539532, 84, 29, 1, 111, 36, 2

Offset: 1

Author

Mohammad K. Azarian, Nov 14 2007

Keywords

• nonn

Comments

Searching up to 200000000, records at 1, 4, 7, 10, 13, 16, 19, 22, 355, 104348, 312689, 1146408, 5419351, 85563208, 165707065, .... - Robert G. Wilson v, Feb 10 2013

Links

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

Crossrefs

Cf. A134890, A134891, A134892, A134893, A134894, A134895.

Programs

Mathematica

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