A348896 Decimal expansion of 2*(sin(Pi/38) - sin((7*Pi)/38) + cos((4*Pi)/19)).

6, 4, 9, 5, 4, 3, 3, 9, 3, 4, 9, 2, 5, 9, 8, 0, 9, 8, 2, 1, 5, 1, 2, 4, 6, 7, 3, 8, 8, 0, 6, 8, 4, 9, 4, 0, 7, 0, 4, 7, 6, 8, 9, 6, 3, 3, 5, 3, 7, 9, 7, 4, 3, 8, 3, 8, 9, 2, 1, 1, 3, 9, 2, 3, 4, 6, 7, 5, 9, 3, 4, 6, 6, 1, 6, 5, 8, 2, 7, 4, 5, 7, 2, 4, 7, 6, 1, 0, 2, 4, 7, 6

Offset

0,1

Links

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

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

Sequence in context: A019931 A195414 A333322 * A153630 A113276 A086034

Adjacent sequences: A348893 A348894 A348895 * A348897 A348898 A348899

Keyword

nonn,cons

Author

Peter Luschny, Nov 08 2021

Status

approved