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 A123082 #7 Apr 26 2019 11:06:51 %S A123082 5,11,17,7,13,19,11,17,23,17,23,29,31,37,43,41,47,53,47,53,59,61,67, %T A123082 73,67,73,79,97,103,109,101,107,113,151,157,163,167,173,179,227,233, %U A123082 239,251,257,263,257,263,269,271,277,283,347,353,359,367,373,379,557,563 %N A123082 Prime trios of form k, k+6, k+12. %H A123082 Harvey P. Dale, <a href="/A123082/b123082.txt">Table of n, a(n) for n = 1..1000</a> %p A123082 i:=1:for k from 1 to 1200 do if isprime(k) and isprime(k+6)and isprime(k+12) then a[i]:=k:a[i+1]:=k+6:a[i+2]:=k+12:i:=i+3 fi od: seq(a[n],n=1..i-1); %t A123082 #+{0,6,12}&/@Select[Prime[Range[150]],AllTrue[#+{6,12},PrimeQ]&] // Flatten (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Apr 26 2019 *) %Y A123082 Cf. A001097. %K A123082 nonn %O A123082 1,1 %A A123082 _Miklos Kristof_, Sep 27 2006