OFFSET
0,1
FORMULA
Equals (-1)^(4/19) - (-1)^(6/19) + (-1)^(9/19) - (-1)^(10/19) + (-1)^(13/19) - (-1)^(15/19).
EXAMPLE
0.64954339349259809821512467388068494070476896335379743838921136...
MAPLE
Digits := 120: (-1)^(4/19) - (-1)^(6/19) + (-1)^(9/19) - (-1)^(10/19) + (-1)^(13/19) - (-1)^(15/19): evalf(%)*10^99: ListTools:-Reverse(convert(floor(%), base, 10));
MATHEMATICA
RealDigits[2*(Sin[Pi/38] - Sin[7*Pi/38] + Cos[4*Pi/19]), 10, 100][[1]] (* Amiram Eldar, Nov 08 2021 *)
PROG
(PARI) 2*(sin(Pi/38) - sin((7*Pi)/38) + cos((4*Pi)/19)) \\ Michel Marcus, Nov 08 2021
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Peter Luschny, Nov 08 2021
STATUS
approved