A114865 Decimal expansion of value of unique local maximum of the Riemann-Siegel theta function.

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

Offset

1,1

Links

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

Eric Weisstein's World of Mathematics, Riemann-Siegel Functions

Example

3.53097282...

Mathematica

t0 = t /. FindRoot[ RiemannSiegelTheta'[t] == 0, {t, -6}, WorkingPrecision -> 110]; RealDigits[ RiemannSiegelTheta[t0], 10, 102] // First (* Jean-François Alcover, Feb 08 2013 *)

Crossrefs

Cf. A114866.

Sequence in context: A337064 A188815 A010615 * A096196 A351179 A076824

Adjacent sequences: A114862 A114863 A114864 * A114866 A114867 A114868

Keyword

nonn,cons

Author

Eric W. Weisstein, Jan 02 2006

Status

approved