A062233 a(n) = floor(sin(n)*cos(2*n)^2*tan(4*n)^3).

0, -123, -1, -1, -8, 1, -1, 0, 83, 0, -1, -1, -40, -1, 0, -3, 5, 0, 0, 296, -1, -1, -1, 60, 0, 0, 9, -2, 0, -1, -227, -1, 0, 0, 20, 0, -1, 3, -5, -1, -1, -991, 0, 0, 0, -34, -1, -1, -14, 1, -1, 0, 978, 0, -1, -1, -13, -1, 0, -5, 3, 0, 0, 6994, -1, -1, -1, 19, 0, 0, 18, -1, 0, -1

Offset

1,2

Links

Harry J. Smith, Table of n, a(n) for n = 1..1000

Xiao Gang, Function calculator (see "How to type a function").

Mathematica

v=[]; for(n=1, 260, v=concat(v, floor(sin(n)*cos(2*n)^2*tan(4*n)^3))); v

Prog

(PARI) { default(realprecision, 100); for (n=1, 1000, write("b062233.txt", n, " ", floor(sin(n)*cos(2*n)^2*tan(4*n)^3)) ) } \\ Harry J. Smith, Aug 03 2009

Crossrefs

Sequence in context: A258489 A015079 A015042 * A351406 A123171 A125097

Adjacent sequences: A062230 A062231 A062232 * A062234 A062235 A062236

Keyword

easy,sign

Author

Jason Earls, Jun 29 2001

Extensions

Terms corrected by removing spurious comma by Harry J. Smith, Aug 03 2009

Status

approved