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 A139780 #18 Sep 08 2022 08:45:33
%S A139780 38318210940,68484878220,143165125680,6353554336290,75041090138100,
%T A139780 91851874324800,116366750976990,118525130067690,368776631152800,
%U A139780 374826155288910,431041855258500,585102141663000,767853933976740,834602006112360,845499208101600,1560061877051100
%N A139780 Average of twin primes of the form p1^3 + p2^2, where p1 < p2 are twin primes.
%H A139780 Amiram Eldar, <a href="/A139780/b139780.txt">Table of n, a(n) for n = 1..10000</a>
%e A139780 38318210940 = 3371^3 + 3373^2 is a term since both (3371, 3373) and (38318210939, 38318210941) are twin primes.
%t A139780 a={};Do[p1=Prime[n];p2=Prime[n+1];pp=p1^3+p2^2;If[(p2-p1)==2&&PrimeQ[pp-1]&&PrimeQ[pp+1],AppendTo[a,pp]],{n,10^4}];Print[a];
%t A139780 Select[#[[1]]^3+#[[2]]^2&/@Select[Partition[Prime[Range[15000]],2,1],#[[2]] - #[[1]]==2&],AllTrue[#+{1,-1},PrimeQ]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jul 01 2021 *)
%o A139780 (Magma) [q:k in [1..10000]|IsPrime((NthPrime(k)+2)) and IsPrime(q-1)and IsPrime(q+1) where q is NthPrime(k)^3+ (NthPrime(k)+2)^2]; // _Marius A. Burtea_, Dec 22 2019
%Y A139780 Cf. A001097, A001359, A006512, A014574.
%Y A139780 Cf. A138716, A138755, A139777.
%K A139780 nonn
%O A139780 1,1
%A A139780 _Vladimir Joseph Stephan Orlovsky_, May 16 2008
%E A139780 More terms from _Amiram Eldar_, Dec 22 2019