This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A319229 #13 Oct 12 2018 19:55:46 %S A319229 12,18,20,23,22,25,24,24,25,21,22,19,18,18,18,14,11,11,9,6,6,4,2,-2, %T A319229 -8,-9,-8,-11,-10,-12,-23,-26,-30,-28,-37,-37,-41,-44,-46,-50,-55,-53, %U A319229 -61,-62,-64,-64,-73,-83,-86,-86,-87,-92,-91,-100,-104,-107,-111,-112,-116,-118 %N A319229 a(n) is equal to the difference between the nearest integer to the imaginary part of the n-th zero of the Riemann zeta function and the n-th prime. %F A319229 a(n) = A002410(n) - prime(n). %e A319229 14 - 2 = 12, 21 - 3 = 18, 25 - 5 = 20. %o A319229 (PARI) lista(nn) = my(v=apply(round, lfunzeros(lzeta, nn))); vector(#v, n, v[n] - prime(n)); \\ _Michel Marcus_, Sep 14 2018 %Y A319229 Cf. A000040, A002410. %K A319229 sign %O A319229 1,1 %A A319229 _Mark A. Thomas_, Sep 14 2018