|
%I #26 Sep 20 2022 02:40:05
%S 1,9,5,0,9,0,3,2,2,0,1,6,1,2,8,2,6,7,8,4,8,2,8,4,8,6,8,4,7,7,0,2,2,2,
%T 4,0,9,2,7,6,9,1,6,1,7,7,5,1,9,5,4,8,0,7,7,5,4,5,0,2,0,8,9,4,9,4,7,6,
%U 3,3,1,8,7,8,5,9,2,4,5,8,0,2,2,5,3,2,5,3,0,9,2,3,4,0,9,0,3,8,1,7,3,0,9,9,2
%N Decimal expansion of the imaginary part of I^(1/8), or sin(Pi/16).
%C The corresponding real part is in A232737.
%H Stanislav Sykora, <a href="/A232738/b232738.txt">Table of n, a(n) for n = 0..1000</a>
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Trigonometric_constants_expressed_in_real_radicals">Trigonometric constants expressed in real radicals</a>
%F Equals (1/2) * sqrt(2-sqrt(2+sqrt(2))). - _Seiichi Manyama_, Apr 04 2021
%e 0.195090322016128267848284868477022240927691617751954807754502...
%t RealDigits[Sin[Pi/16],10,120][[1]] (* _Harvey P. Dale_, Sep 01 2018 *)
%o (PARI) imag(I^(1/8)) \\ _Seiichi Manyama_, Apr 04 2021
%o (PARI) sin(Pi/16) \\ _Seiichi Manyama_, Apr 04 2021
%o (PARI) sqrt(2-sqrt(2+sqrt(2)))/2 \\ _Seiichi Manyama_, Apr 04 2021
%o (Magma) R:= RealField(116); Sin(Pi(R)/16); // _G. C. Greubel_, Sep 20 2022
%o (SageMath) numerical_approx(sin(pi/16), digits=116) # _G. C. Greubel_, Sep 20 2022
%Y Cf. A232737 (real part), A010503 (imag(I^(1/2))), A182168 (imag(I^(1/4))), A019827 (imag(I^(1/5))), A019824 (imag(I^(1/6))), A232736 (imag(I^(1/7))), A019819 (imag(I^(1/9))), A019818 (imag(I^(1/10))).
%K nonn,cons,easy
%O 0,2
%A _Stanislav Sykora_, Nov 29 2013
|
