A336052 Decimal expansion of the solution c of s/c = 4, where s = arclength and c = chord length on the unit circle.

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

Offset

1,2

Comments

See A336043 for a guide to related sequences.

Links

Table of n, a(n) for n=1..86.

Index entries for transcendental numbers.

Example

s = 4.949153574739658025128860220663074713302095037797400...
c = 1.237288393684914506282215055165768678325523759449350...

Mathematica

t = t /.FindRoot[t == 4 Sqrt[2 - 2 Cos[t]], {t, 4}, WorkingPrecision -> 200]
c = t/4
RealDigits[t][[1]]   (* A336051 *)
RealDigits[c][[1]]   (* A336052 *)

Prog

(PARI) solve(t=4, 5, t-4*sqrt(2-2*cos(t)))/4 \\ Charles R Greathouse IV, May 13 2026

Crossrefs

Cf. A336043, A336051.

Sequence in context: A292389 A195306 A330421 * A174606 A096389 A390286

Adjacent sequences: A336049 A336050 A336051 * A336053 A336054 A336055

Keyword

nonn,cons

Author

Clark Kimberling, Jul 10 2020

Status

approved