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 A080082 #11 Mar 11 2025 04:42:37 %S A080082 7,23,139,113,1129,2477,1327,30593,81463,44293,34061,404597,265621, %T A080082 155921,1100977,1098847,1349533,3117299,6958667,10343761,6034247, %U A080082 49269581,83751121,39389989,166726367,107534587,232423823,253878403,327966101,519653371,1202442089,1649328997 %N A080082 Smallest prime p such that there is a gap of 2*prime(n) between p and next prime. %F A080082 A000230(A000040(n)) < a(n). %F A080082 a(n) = A080083(n) - 2*A000040(n). %o A080082 (PARI) list(len) = {my(v = vector(len), prv = 3, c = 0, d, i); forprime(p = 5, , d = (p - prv)/2; if(isprime(d), i = primepi(d); if(i < = len && v[i] == 0, c++; v[i] = prv; if(c == len, break))); prv = p); v; } \\ _Amiram Eldar_, Mar 11 2025 %Y A080082 Cf. A000040, A000230, A080083. %K A080082 nonn %O A080082 1,1 %A A080082 _Reinhard Zumkeller_, Jan 26 2003 %E A080082 a(17)-a(28) from _Donovan Johnson_, May 30 2010 %E A080082 a(29)-a(32) from _Amiram Eldar_, Mar 11 2025