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 A139445 #11 Jan 23 2025 17:22:54 %S A139445 3,4,5,10,11,13,41,55,66,94,104,325,363,424,672,734,818,1044,1389, %T A139445 1595,1728,2870,3149,3922,5352,9431,11586,13991,17507 %N A139445 Numbers n such that primorial(n)/2 + 32 is prime. %C A139445 a(30)>25000. - _Robert Price_, Dec 28 2016 %t A139445 k = 1/2; a = {}; Do[k = k*Prime[n]; If[PrimeQ[k + 32], Print[n]; AppendTo[a, n]], {n, 325}]; a %t A139445 Position[FoldList[Times,Prime[Range[900]]],_?(PrimeQ[#/2+32]&)]//Flatten (* The program generates the first 17 terms of the sequence. *) (* _Harvey P. Dale_, Jan 23 2025 *) %Y A139445 Cf. A067026, A067027, A139439-A139457, A103514. %K A139445 nonn,more %O A139445 1,1 %A A139445 _Artur Jasinski_, Apr 21 2008 %E A139445 a(13)-a(22) from _Ray Chandler_, Jun 16 2013 %E A139445 a(23)-a(29) from _Robert Price_, Dec 28 2016