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 A139777 #10 Dec 22 2019 07:24:06 %S A139777 13008,9268057799643918,1151303780719281840798,1166398496059056623580, %T A139777 1408815704665167877050,1611023943160530038112,1839284737645145603808, %U A139777 1876391173984974899670,2541672151459722294708,3760269231809150191932,13232137801909374644760,19086525662779517405622 %N A139777 Average of twin primes p4 = p1^3 + p2^2 such that p1 < p2 are consecutive primes and p3 = p1^2 + p2^3 is also an average of twin primes. %H A139777 Amiram Eldar, <a href="/A139777/b139777.txt">Table of n, a(n) for n = 1..2000</a> %e A139777 13008 = 23^3 + 29^2 is a term since 23 and 29 are consecutive primes, (13007, 13009) are twin primes, 23^2 + 29^3 = 24918, and (24917, 24919) are also twin primes. %t A139777 a={};Do[p1=Prime[n];p2=Prime[n+1];p3=p1^2+p2^3;p4=p1^3+p2^2;If[PrimeQ[p3-1]&&PrimeQ[p3+1]&&PrimeQ[p4-1]&&PrimeQ[p4+1],AppendTo[a,p4]],{n,13^5}];Print[a]; %Y A139777 Cf. A001097, A001359, A006512, A014574. %Y A139777 Cf. A138716, A138755, A139780. %K A139777 nonn %O A139777 1,1 %A A139777 _Vladimir Joseph Stephan Orlovsky_, May 16 2008 %E A139777 More terms from _Amiram Eldar_, Dec 22 2019