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

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

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.

Formula

s = 4.55772532015165662539990220912377725763654948...

c = 1.51924177338388554179996740304125908587884982...

Mathematica

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

Prog

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

Crossrefs

Cf. A336043, A336047.

Sequence in context: A050358 A147319 A147326 * A143114 A103133 A098318

Adjacent sequences: A336045 A336046 A336047 * A336049 A336050 A336051

Keyword

nonn,cons

Author

Clark Kimberling, Jul 08 2020

Status

approved