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 A154668 #13 Sep 08 2022 08:45:40 %S A154668 4,6,60,420,2730,8970,11970,21840,28620,29130,44130,48120,55050,56100, %T A154668 61980,74160,84390,87540,111270,111870,143880,176550,191670,207510, %U A154668 227610,229590,233550,251220,258330,281580,324450,343770,356820,390000 %N A154668 Averages of twin primes such that p1*p2 -+ AverageTwinPrime are primes. %H A154668 Amiram Eldar, <a href="/A154668/b154668.txt">Table of n, a(n) for n = 1..10000</a> %e A154668 3*5 - 4 = 11 and 3*5 + 4 = 19. %e A154668 5*7 - 6 = 29 and 5*7 + 6 = 41. %t A154668 lst={};Do[If[PrimeQ[n-1]&&PrimeQ[n+1],If[PrimeQ[(n-1)*(n+1)-n]&&PrimeQ[(n-1)*(n+1)+n],AppendTo[lst,n]]],{n,2*9!}];lst %o A154668 (Magma) [NthPrime(k)+1:k in [1..35000]|IsPrime(NthPrime(k)+2) and forall{s:s in [1+NthPrime(k),-1-NthPrime(k)]|IsPrime(NthPrime(k)*NthPrime(k+1)+s)}]; // _Marius A. Burtea_, Dec 22 2019 %Y A154668 Cf. A014574, A154666, A154667. %K A154668 nonn %O A154668 1,1 %A A154668 _Vladimir Joseph Stephan Orlovsky_, Jan 13 2009