Out of curiosity, I was taking a look at the R {pracma} package zeta()
function, and specifically the example
## First zero on the critical line s = 0.5 + i t
example in the documentation:
x <- seq(0, 20, len=1001)
z <- 0.5 + x*1i
fr <- Re(zeta(z))
fi <- Im(zeta(z))
fa <- abs(zeta(z))
the first root corresponds to
min(fa) 0.00418561897356751
which happens to be the absolute value of the zeta function at $0.5\,+\,14.14\,i$:
x[which.min(fa)] 14.14
However, $\small 0.00418561897356751$ is not too close an approximation to $\small 0$. For instance Wolfram alpha approximates the first non-trivial zero to $0.5 + 14.1347\,i$:
$$\tiny 0.5 + 14.13472514173469379045725198356247027078425711569924317568556746014996342980925676494901039317\,i$$
Questions:
[After the helpful comments received, it is clear that the roots of the Riemann zeta function are likely approximated numerically].
What degree of precision is needed to claim one additional root in the trillions of roots already found in the critical line?
Is there a way of using the
zeta()
function to look for roots of the zeta function? Are there other, perhaps more sanctioned (?) computer algorithms?
NOTE: I am aware of the note on the linked page: The zeros are accurate to an absolute precision of $\pm 2\times 10^{−102}$, but I don't know its source.
seq(0, 20, len=1001)
says you look at values that are $0.02 i$ apart, so you only look at $\frac{1}{2} + 14.12 i,; \frac{1}{2} + 14.14 i,; \frac{1}{2} + 14.16 i$, and you don't come particularly close to the zero. If you feed the function a better approximation of the zero, I'm convinced it will compute a value much closer to $0$. – Daniel Fischer Jun 12 '17 at 14:17x <- seq(0, 20, 0.0001)
,min(fa) 1.9941387992206e-05
andx[which.min(fa)] 14.1347
– Antoni Parellada Jun 12 '17 at 14:36