Download or view graphRiemannZeta.frink in plain text format
/** This graphs the Riemann Zeta function along the critical line
RiemannZeta[1/2 + i s] for real values of s. This is probably the graph
you have seen of the Riemann Zeta function. Compare it to
https://en.wikipedia.org/wiki/Riemann_zeta_function#/media/File:Zeta_polar.svg
*/
use RiemannZeta.frink
use Grid.frink
p = new polyline
for s = 0 to 384 step .01
{
z = RiemannZeta[1/2 + i s, 50]
p.addPoint[Re[z], -Im[z]]
}
g = new graphics
g.add[p]
grid = new Grid
grid.auto[g]
g.add[grid.getGrid[]]
g.show[]
//g.print[]
Download or view graphRiemannZeta.frink in plain text format
This is a program written in the programming language Frink.
For more information, view the Frink
Documentation or see More Sample Frink Programs.
Alan Eliasen, eliasen@mindspring.com