A134895 Floor(n*exp(tan n)).

4, 0, 2, 12, 0, 4, 16, 0, 5, 19, 0, 6, 20, 19607, 6, 21, 559, 5, 22, 187, 4, 22, 112, 2, 21, 84, 1, 21, 70, 0, 19, 61, 0, 18, 56, 83615, 15, 51, 1448, 13, 48, 415, 9, 44, 227, 5, 41, 159, 2, 38, 125, 0, 34, 105, 0, 30, 92, 240698

Offset

1,1

Links

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

Mathematica

Table[Floor[n * Exp[Tan[n]]], {n, 100}] (* Vincenzo Librandi, Feb 18 2013 *)

Prog

(Magma) [Floor(n*Exp(Tan(n))): n in [1..60]]; // Vincenzo Librandi, Feb 18 2013

Crossrefs

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

Sequence in context: A208333 A279413 A208748 * A318468 A346492 A145877

Adjacent sequences: A134892 A134893 A134894 * A134896 A134897 A134898

Keyword

nonn,easy

Author

Mohammad K. Azarian, Nov 14 2007

Status

approved