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 A124619 #14 Mar 23 2020 04:07:30 %S A124619 39,195,351,741,897,1313,1443,1599,2379,2405,2535,2613,2691,2847,3055, %T A124619 3081,3627,3705,4641,4771,5031,5577,5655,5889,5967,6045,6201,6409, %U A124619 6825,6877,6903,7007,7033,7605,7943,8437,8541,8931,8957,9009,9035,9321,9607 %N A124619 Odd interprimes divisible by 13. %H A124619 Amiram Eldar, <a href="/A124619/b124619.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Harvey P. Dale) %t A124619 Do[If[OddQ[(Prime[n + 1] + Prime[n])/2] && Mod[(Prime[n + 1] + Prime[n])/2, 13] == 0, Print[(Prime[n + 1] + Prime[n])/2]], {n, 1, 3000}] (*Artur Jasinski*) %t A124619 Select[(Total/@Partition[Prime[Range[1200]],2,1])/2,OddQ[#]&&Mod[#,13] == 0&] (* _Harvey P. Dale_, May 23 2019 *) %Y A124619 Cf. A072569, A072572, A072573, A126228, A126229, A126230, A124620, A126231, A124622, A126233. %K A124619 nonn %O A124619 1,1 %A A124619 _Artur Jasinski_, Dec 21 2006 %E A124619 Extended by _Ray Chandler_, Jan 09 2007