A257452 Decimal expansion of the maximum of (1-cos(x))/x.

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

Offset

0,1

Comments

The location of the maximum, and more comments, are in A257451.

Links

Stanislav Sykora, Table of n, a(n) for n = 0..2000

Formula

Equals (1-cos(A257451))/A257451.

Example

0.724611353776708475738990453525631784347865101838391714959...

Mathematica

RealDigits[FindMaximum[(1 - Cos[x])/x, x, WorkingPrecision -> 120][[1]]][[1]] (* Amiram Eldar, Mar 25 2026 *)

Prog

(PARI) xmax = solve(x=1, 3, x*sin(x)-1+cos(x)); a=(1-cos(xmax))/xmax

Crossrefs

Cf. A257451.

Sequence in context: A167902 A356032 A154174 * A393365 A021142 A126561

Adjacent sequences: A257449 A257450 A257451 * A257453 A257454 A257455

Keyword

nonn,cons

Author

Stanislav Sykora, Apr 23 2015

Status

approved