|
%I #18 Sep 08 2022 08:44:59
%S 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,
%T -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,
%U -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
%N a(n) = floor(tan(2^n)).
%p Digits:=500; seq(floor(evalf(tan(2^n))), n=0..120); # _Georg Fischer_, Aug 30 2021
%t Floor[Tan[2^Range[0, 120]]] (* _Wesley Ivan Hurt_, May 02 2021 *)
%o (Magma) [Floor(Tan(2^n)) : n in [0..100]]; // _Wesley Ivan Hurt_, Apr 23 2021
%K sign,easy
%O 0,2
%A _N. J. A. Sloane_
%E More terms from _James A. Sellers_
%E a(34) and following corrected by _Georg Fischer_, Aug 30 2021
|
