A134898 Ceiling(n*exp(sec n)).

7, 1, 2, 1, 170, 18, 27, 1, 4, 4, 1484429287810386706180357941514616918998247619752106278380016249467303567341589522908388755572386424, 40, 40, 21002, 5, 6, 1, 82, 53, 232, 4, 9, 4, 254, 69, 122, 1, 10, 8, 19617, 93, 107, 1, 11, 12, 1, 137, 109, 1659, 9

Offset: 1

Author

Mohammad K. Azarian, Nov 14 2007

Keywords

• nonn

Links

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

Crossrefs

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

Programs

Mathematica

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

Extensions

Corrected by Vincenzo Librandi, Feb 08 2013