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 A197300 #15 Dec 28 2015 15:16:26 %S A197300 2,3,5,7,11,13,17,19,23,29,37,47,59,61,67,71,89,97,109,137,139,167, %T A197300 173,191,223,229,239,241,269,271,293,311,331,347,367,401,431,433,457, %U A197300 503,509,571,577,661,709,719,733,739,797,911,919,1009 %N A197300 The Riemann primes of the theta type and index 4. %C A197300 The sequence consists of the prime numbers p that are champions (left to right maxima) of the function |theta(p^4)-p^4|, where theta(p) is the Chebyshev theta function, theta(x) = sum_{primes p <=x } log p. %H A197300 M. Planat and P. Solé, <a href="http://arxiv.org/abs/1109.6489">Efficient prime counting and the Chebyshev primes</a>, arXiv:1109.6489 [math.NT] %o A197300 (Perl) use ntheory ":all"; my($max,$f)=(0); forprimes { $f=abs(chebyshev_theta($_**4)-$_**4); if ($f > $max) { say; $max=$f; } } 1000; # _Dana Jacobsen_, Dec 28 2015 %Y A197300 Cf. A035158, A196670, A197188, A197297, A197298, A197299. %K A197300 nonn %O A197300 1,1 %A A197300 _Michel Planat_, Oct 13 2011 %E A197300 More terms from _Dana Jacobsen_, Dec 28 2015