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 A115395 #12 Jul 14 2025 17:12:22 %S A115395 71,127,139,149,211,241,293,397,401,409,421,479,487,491,499,521,523, %T A115395 617,661,673,691,701,743,761,773,787,797,809,907,911,967,1049,1061, %U A115395 1151,1153,1163,1171,1201,1213,1249,1279,1399,1409,1471,1523,1571,1583,1597 %N A115395 Primes p such that p+-6 are semiprimes. %H A115395 K. D. Bajpai, <a href="/A115395/b115395.txt">Table of n, a(n) for n = 1..10000</a> %e A115395 71-6=65=5*13 (semiprime), 71+6=77=7*11 (semiprime). %t A115395 A115395 = {}; k = Prime[n]; Do[If[PrimeOmega[k + 6] == 2 && PrimeOmega[k - 6] == 2, AppendTo[A115395, k]], {n, 1000}]; A115395 (* _K. D. Bajpai_, Jun 24 2014 *) %o A115395 (PARI) lista(nn) = {pr = primes(nn); pp = select(i->((bigomega(i-6) == 2) && (bigomega(i+6) == 2)), pr); print(pp);} \\ _Michel Marcus_, Oct 09 2013 %Y A115395 Cf. A063643 Primes p such that p+-2 are semiprimes, A117328 Primes p such that p+-4 are semiprimes. %K A115395 nonn %O A115395 1,1 %A A115395 _Zak Seidov_, Mar 08 2006