A051511 a(n) = floor(tan(2^n)).

1, -3, 1, -7, 0, 0, 2, -2, 25, -1, -1, -1, -1, -4, 0, 2, -1, -24, 0, 0, 0, 0, 4, -1, -2, 4, -1, -2, 5, -1, -1, -5, 0, 1, -3, 0, 5, -1, -1, -5, 0, 1, -10, 0, 0, 1, -31, 0, 0, 0, 0, 1, -2, 1, -3, 1, -4, 0, 1, -2, 1, -3, 0, 84, -1, -1, -1, -1, -1, -1, -17, 0, 0, 0, 1, -3, 0, 7, -1, -1, -2, 1, -2, 2, -2, 28, -1, -1, -1, -1, -3, 1, -6, 0, 0, 30, -1, -1, -1, -1, -2, 1, -2, 1, -3, 0, 3, -1, -2, 1, -3, 0, 4, -1, -2, 9, -1, -1, -2, 5, -1

Offset

0,2

Links

Table of n, a(n) for n=0..120.

Maple

Digits:=500; seq(floor(evalf(tan(2^n))), n=0..120); # Georg Fischer, Aug 30 2021

Mathematica

Floor[Tan[2^Range[0, 120]]] (* Wesley Ivan Hurt, May 02 2021 *)

Prog

(Magma) [Floor(Tan(2^n)) : n in [0..100]]; // Wesley Ivan Hurt, Apr 23 2021

Crossrefs

Sequence in context: A025230 A152456 A128605 * A272030 A340878 A346182

Adjacent sequences: A051508 A051509 A051510 * A051512 A051513 A051514

Keyword

sign,easy

Author

N. J. A. Sloane

Extensions

More terms from James A. Sellers

a(34) and following corrected by Georg Fischer, Aug 30 2021

Status

approved