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

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

Offset

1,1

Comments

See A336043 for a guide to related sequences.

s = 5.191478159299598563533719400956387835589087885488...

c = 1.038295631859919712706743880191277567117817577097...

Links

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

Index entries for transcendental numbers.

Mathematica

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

Prog

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

Crossrefs

Cf. A336043, A336054.

Sequence in context: A115521 A382408 A140705 * A266072 A376018 A147423

Adjacent sequences: A336050 A336051 A336052 * A336054 A336055 A336056

Keyword

nonn,cons

Author

Clark Kimberling, Jul 10 2020

Status

approved