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 A139444 #12 Feb 25 2017 16:40:06 %S A139444 4,7,9,13,22,26,30,33,36,38,42,114,125,126,181,291,296,386,1415,2573, %T A139444 3727,5574,7523,8682,9765 %N A139444 Numbers n such that primorial(n)/2 - 16 is prime. %C A139444 a(26) > 25000. - _Robert Price_, Feb 25 2017 %t A139444 k = 1; a = {}; Do[k = k*Prime[n]; If[PrimeQ[k - 16] && k>16, Print[n]; AppendTo[a, n]], {n, 2, 752}]; a %Y A139444 Cf. A067026, A067027, A139439-A139457, A103514. %K A139444 nonn,more %O A139444 1,1 %A A139444 _Artur Jasinski_, Apr 21 2008 %E A139444 Drop 2 and correct program, a(16)-a(20) from _Ray Chandler_, Jun 16 2013 %E A139444 a(21)-a(25) from _Robert Price_, Feb 25 2017