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 A046122 #25 Feb 16 2025 08:32:38 %S A046122 11,17,47,67,257,607,647,1097,1487,1607,1747,1867,2377,2677,3307,3917, %T A046122 4007,5107,5387,5437,5647,6317,6367,9467,11827,12107,12647,13457, %U A046122 14627,14747,15797,15907,17477,18217,19477,20347,21487,23327,24097 %N A046122 Second member of a sexy prime quadruple: value of p+6 such that p, p+6, p+12 and p+18 are all prime. %H A046122 Amiram Eldar, <a href="/A046122/b046122.txt">Table of n, a(n) for n = 1..10000</a> %H A046122 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/SexyPrimes.html">Sexy Primes</a>. [The definition in this webpage is unsatisfactory, because it defines a "sexy prime" as a pair of primes.- _N. J. A. Sloane_, Mar 07 2021]. %F A046122 a(n) = 6 + A023271(n) = A046123(n) - 6. - _R. J. Mathar_, Jun 28 2012 %t A046122 lst={};Do[p=Prime[n];If[PrimeQ[p+6]&&PrimeQ[p+12]&&PrimeQ[p+18], AppendTo[lst, p+6]], {n, 8!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Aug 29 2008 *) %Y A046122 Cf. A023201, A023271, A046117, A046123, A046124. %K A046122 nonn %O A046122 1,1 %A A046122 _Eric W. Weisstein_