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 A109934 #10 Aug 03 2014 16:52:44 %S A109934 4,6,27,35,51,57,65,77,87,93,95,117,119,121,123,125,135,143,145,147, %T A109934 155,161,171,177,185,187,189,203,205,207,209,215,217,219,221,237,245, %U A109934 247,249,255,261,267,275,287,289,291,297,299,301,303,305,321,323,325,327 %N A109934 Composite numbers which are not the sum of two distinct primes. %C A109934 Perhaps there are no even terms > 6. %H A109934 T. D. Noe, <a href="/A109934/b109934.txt">Table of n, a(n) for n = 1..10000</a> %t A109934 f[n_] := (p = 0; pn = PrimePi[n]; %t A109934 Do[ If[n == Prime[i] + Prime[k], p = p + 1; If[p > 2, Break[]]], {i, 1, pn}, %t A109934 {k, i+1, pn}]; p ); %t A109934 Select[Range[2, 400], ! PrimeQ[#] && f[#] == 0 & ] (* _Jean-François Alcover_, Mar 07 2011 *) %Y A109934 Cf. A025583. %K A109934 nonn %O A109934 1,1 %A A109934 _Amarnath Murthy_, Jul 19 2005