A134899 Floor(n*exp(sec(n))).

6, 0, 1, 0, 169, 17, 26, 0, 3, 3, 1484429287810386706180357941514616918998247619752106278380016249467303567341589522908388755572386423, 39, 39, 21001, 4, 5, 0, 81, 52, 231, 3, 8, 3, 253, 68, 121, 0, 9, 7, 19616, 92, 106, 0, 10, 11, 0, 136, 108, 1658, 8, 14

Offset: 1

Author

Mohammad K. Azarian, Nov 14 2007

Keywords

• nonn
• easy

Links

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

Crossrefs

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

Programs

Mathematica

Table[Floor[n Exp[Sec[n]]], {n, 60}] (* Harvey P. Dale, Jan 15 2013 *)

Extensions

Corrected and extended by Harvey P. Dale, Jan 15 2013