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 A051611 #14 Jun 01 2016 11:37:06
%S A051611 1,3,5,8,10,14,15,17,19,23,26,28,32,33,35,40,41,44,45,47,50,52,53,54,
%T A051611 59,62,63,68,71,74,75,77,78,80,82,85,86,89,95,96,98,103,104,105,107,
%U A051611 109,113,116,117,118,122,124,125,128,129,131,134,138,140,143,145,147
%N A051611 Numbers that are not the sum of 2 nonzero triangular numbers.
%C A051611 A053603(a(n)) = 0. - _Reinhard Zumkeller_, Jun 28 2013
%H A051611 T. D. Noe, <a href="/A051611/b051611.txt">Table of n, a(n) for n=1..1000</a>
%t A051611 notSumQ[n_] := Reduce[ 0 < x <= y && n == x*(x + 1)/2 + y*(y + 1)/2, {x, y}, Integers] === False; Select[ Range[150], notSumQ] (* _Jean-François Alcover_, Jun 27 2012 *)
%t A051611 With[{trnos=Accumulate[Range[100]]},Complement[Range[150],Total/@ Tuples[ trnos,2]]] (* _Harvey P. Dale_, Jun 01 2016 *)
%o A051611 (Haskell)
%o A051611 a051611 n = a051611_list !! (n-1)
%o A051611 a051611_list = filter ((== 0) . a053603) [1..]
%o A051611 -- _Reinhard Zumkeller_, Jun 28 2013
%Y A051611 Integers not in the sequence A051533. Cf. A002097, A000217, A007294, A051611, A053603.
%K A051611 easy,nonn,nice
%O A051611 1,2
%A A051611 Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de)