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 A117112 #9 Apr 21 2019 15:17:31
%S A117112 2,3,7,11,13,29,31,37,43,61,67,73,79,83,97,101,127,137,139,151,157,
%T A117112 163,181,191,193,199,211,227,241,263,277,281,307,331,353,367,373,379,
%U A117112 389,409,421,433,443,461,463,487,499,541,571,577,587,601,619,631,659,661
%N A117112 Primes expressible as the sum of two triangular numbers (including zero).
%C A117112 See A117048 for the primes that are the sum of two positive triangular numbers. The only difference is that the prime 3 occurs here.
%F A117112 A000040 intersect A020756. - _Jonathan Vos Post_, Apr 17 2006
%e A117112 2 = 1 + 1
%e A117112 3 = 0 + 3
%e A117112 7 = 1 + 6
%e A117112 and so on.
%t A117112 tri = Table[n (n + 1)/2, {n, 0, 40}]; Select[Union[Flatten[Outer[Plus, tri, tri]]], # <= tri[[-1]]+1 && PrimeQ[#] &] (* _T. D. Noe_, Apr 07 2011 *)
%t A117112 Select[Total/@Tuples[Accumulate[Range[0,40]],2],PrimeQ]//Union (* _Harvey P. Dale_, Apr 21 2019 *)
%Y A117112 Cf. A000217, A117048.
%K A117112 easy,nonn
%O A117112 1,1
%A A117112 _Greg Huber_, Apr 18 2006