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 A174797 #8 Apr 20 2014 03:06:58
%S A174797 1,4,21,87,120,141,142,168,188,320,363,387,434,464,496,539,593,675,
%T A174797 721,794,810,995,1032,1105,1147,1166,1228,1356,1391,1477,1478,1498,
%U A174797 1702,1771,1790,1797,1803,1818,1849,1850,1881,1967,2016,2039,2052,2065,2091
%N A174797 Numbers n such that both semiprime(n) and semiprime(n+1) are even.
%C A174797 Semiprime(n)/2 and semiprime(n+1)/2 are consecutive primes.
%H A174797 Vincenzo Librandi, <a href="/A174797/b174797.txt">Table of n, a(n) for n = 1..2000</a>
%F A174797 A001358(a(n)) = 2*A000040(A174798(n)).
%e A174797 a(1)=1 because both semiprime(1)=4 and semiprime(2)=6 are even
%e A174797 a(2)=4 because both semiprime(4)=10 and semiprime(5)=14 are even.
%t A174797 Flatten[Position[Partition[Select[Range[10000],PrimeOmega[#]==2&],2,1],_?(EvenQ[First[#]]&&EvenQ[Last[#]]&),{1},Heads->False]] (* _Harvey P. Dale_, Apr 19 2014 *)
%Y A174797 Cf. A000040, A001358, A174798.
%K A174797 nonn
%O A174797 1,2
%A A174797 _Juri-Stepan Gerasimov_, Mar 29 2010
%E A174797 Edited and corrected by _Ray Chandler_, Apr 07 2010