cp's OEIS Frontend

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.

A117314 Twin-prime pairs expressible as the sum of two triangular numbers.

This page as a plain text file.
%I A117314 #12 Mar 05 2024 14:43:46
%S A117314 11,13,29,31,137,139,191,193,461,463,659,661,821,823,1091,1093,1721,
%T A117314 1723,2027,2029,2081,2083,2711,2713,3359,3361,3539,3541,3917,3919,
%U A117314 6131,6133,6761,6763,7589,7591,7877,7879,7949,7951,8219,8221,9461,9463,9857
%N A117314 Twin-prime pairs expressible as the sum of two triangular numbers.
%H A117314 Amiram Eldar, <a href="/A117314/b117314.txt">Table of n, a(n) for n = 1..10000</a>
%e A117314 a(1) = 11 = 1 + 10; a(2) = 13 = 3 + 10.
%t A117314 s = Select[Union@ Flatten@ Table[i(i + 1)/2 + j(j + 1)/2, {i, 200}, {j, 0, i}], PrimeQ@ # &]; t = Select[Range@Length@s - 1, s[[ # ]] + 2 == s[[ # + 1]] &]; Sort@Join[s[[t]], s[[t + 1]]] (* _Robert G. Wilson v_, Apr 27 2006 *)
%Y A117314 Cf. A117048, A117112, A118638.
%K A117314 easy,nonn
%O A117314 1,1
%A A117314 _Greg Huber_, Apr 24 2006
%E A117314 More terms from _Robert G. Wilson v_, Apr 27 2006