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.

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 *)

Crossrefs

Cf. A336043, A336054.

Sequence in context: A255294 A115521 A140705 * A266072 A147423 A147085

Adjacent sequences: A336050 A336051 A336052 * A336054 A336055 A336056

Keyword

nonn,cons

Author

Clark Kimberling, Jul 10 2020

Status

approved