A332504 Decimal expansion of the number u in [0,2 Pi] such that snc(u) = 0, where snc is the sine-normal-to-cosine function; see A332500.

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

Offset

0,1

Links

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

Formula

u = x - Pi, where snc(x) = Pi, as in A332505.

Example

u = 0.4787224241179413703304116508523039...

Mathematica

u = u /. FindRoot[ u Sec[u] + Sin[u] == 1, {u, 0}, WorkingPrecision -> 150]
RealDigits[u][[1]]

Crossrefs

Cf. A332500, A332505.

Sequence in context: A200367 A272490 A261654 * A121488 A115291 A108615

Adjacent sequences: A332501 A332502 A332503 * A332505 A332506 A332507

Keyword

nonn,cons

Author

Clark Kimberling, May 05 2020

Status

approved