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 A139446 #7 Jan 03 2017 02:35:35 %S A139446 4,5,6,8,10,12,23,38,50,65,67,95,100,108,114,281,835,894,1103,3442, %T A139446 6629 %N A139446 Numbers n such that primorial(n)/2 - 32 is prime. %C A139446 a(22) > 25,000. - _Robert Price_, Jan 02 2017 %t A139446 k = 1; a = {}; Do[k = k*Prime[n]; If[PrimeQ[k - 32] && k>32, Print[n]; AppendTo[a, n]], {n, 2, 325}]; a %Y A139446 Cf. A067026, A067027, A139439-A139457, A103514. %K A139446 nonn %O A139446 1,1 %A A139446 _Artur Jasinski_, Apr 21 2008 %E A139446 Drop 2,3 and correct program, a(17)-a(19) from _Ray Chandler_, Jun 16 2013 %E A139446 a(20)-a(21) from _Robert Price_, Jan 02 2017