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 A228185 #9 Dec 12 2014 16:07:05
%S A228185 0,14,393,4761,47938,456157,4293575,40357922
%N A228185 Number of semiprimes generated from Euler's polynomial x^2 + x + 41 from x = 1 to 10^n.
%e A228185 a(4) = 4761 because the number of semiprimes generated from Euler's polynomial x^2 + x + 41 from x = 1 to 10^4 are 4761.
%t A228185 a = 0; n = 1; t = {}; Do[If[PrimeOmega[x^2 + x + 41]== 2, a = a + 1]; If[Mod[x, n] == 0, n = n*10; AppendTo[t, a]], {x, 1, 100000000}]; t
%t A228185 nn=8;With[{ep=If[PrimeOmega[#]==2,1,0]&/@Table[x^2+x+41,{x,10^nn}]}, Table[ Total[Take[ep,10^n]],{n,nn}]] (* _Harvey P. Dale_, Dec 12 2014 *)
%Y A228185 Cf. A228123.
%K A228185 nonn,less
%O A228185 1,2
%A A228185 _Shyam Sunder Gupta_, Aug 15 2013