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
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[Floor(n*Exp(Tan(n))): n in [1..60]]; // Vincenzo Librandi, Feb 18 2013
-
Mathematica
Table[Floor[n * Exp[Tan[n]]], {n, 100}] (* Vincenzo Librandi, Feb 18 2013 *)