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 A139450 #7 May 02 2017 20:45:25
%S A139450 6,7,17,26,32,40,43,391,435,1509,1629,2906,3525,5670,8586,12103,12528,
%T A139450 16682
%N A139450 Numbers n such that primorial(n)/2 - 128 is prime.
%C A139450 a(19) > 25,000. - _Robert Price_, May 02 2017
%t A139450 k = 1; a = {}; Do[k = k*Prime[n]; If[PrimeQ[k - 128]&&k>128, Print[n]; AppendTo[a, n]], {n, 2, 325}]; a
%Y A139450 Cf. A067026, A067027, A139439-A139457, A103514.
%K A139450 nonn
%O A139450 1,1
%A A139450 _Artur Jasinski_, Apr 21 2008
%E A139450 Drop 3,4 and correct program, a(9)-a(12) from _Ray Chandler_, Jun 16 2013
%E A139450 a(13)-a(18) from _Robert Price_, May 02 2017