Logarithmic square root waves

Mathematica


Clear[A, B, n, k, T, nn]
nn = 100;
Monitor[A =
Table[Table[N[Re[k^ZetaZero[n]], 12], {k, 1, nn}], {n, 1, nn}];, n]
ArrayPlot[A, ImageSize -> Full]

logarithmic square root waves

Advertisements
This entry was posted in Uncategorized. Bookmark the permalink.

One Response to Logarithmic square root waves

  1. Pingback: blogging

Comments are closed.