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 A238400 #15 Feb 27 2014 05:35:54 %S A238400 2,3,7,1237,66067,525593,974167,1412473,2675759,4471237,5264333, %T A238400 8107961,8308271,12615151,20145407,34926433,43167569,94772749, %U A238400 104612297,115103327,144450221,153124973,165108557,196634723,211696049,213507241,255963131,263979101 %N A238400 Primes in A238399. %H A238400 Giovanni Resta, <a href="/A238400/b238400.txt">Table of n, a(n) for n = 1..100</a> %t A238400 Select[(PrimePi[#^2 + #] - PrimePi[#]) & /@ Select[Prime@Range[3000], PrimeQ[#^2 + # + 1] &], PrimeQ] (* _Giovanni Resta_, Feb 27 2014 *) %Y A238400 Cf. A238399, A053182, A053183. %K A238400 nonn %O A238400 1,1 %A A238400 _Torlach Rush_, Feb 26 2014 %E A238400 Corrected by _Torlach Rush_, Feb 26 2014 %E A238400 a(16)-a(28) from _Giovanni Resta_, Feb 27 2014