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 A234096 #5 Dec 04 2016 19:46:33
%S A234096 8,11,17,18,20,26,28,29,33,35,39,43,44,46,47,48,56,58,60,62,65,67,71,
%T A234096 72,73,78,80,81,89,92,93,94,101,102,103,105,107,108,109,110,111,118,
%U A234096 119,124,125,127,130,133,134,144,146,148,150,151,152,153,155,160
%N A234096 Integers of the form (p*q + 1)/2, where p and q are distinct primes.
%F A234096 1 + A234093.
%e A234096 (3*5 + 1)/2 = 8, (3*7 + 1)/2 = 11.
%t A234096 t = Select[Range[1, 7000, 2], Map[Last, FactorInteger[#]] == Table[1, {2}] &]; Take[(t + 1)/2, 120] (* A234096 *)
%t A234096 v = Flatten[Position[PrimeQ[(t + 1)/2], True]] ; w = Table[t[[v[[n]]]], {n, 1, Length[v]}] (* A233562 *)
%t A234096 (w + 1)/2 (* A234098 *) (* _Peter J. C. Moses_, Dec 23 2013 *)
%Y A234096 Cf. A234093, A233562, A234098.
%K A234096 nonn,easy
%O A234096 1,1
%A A234096 _Clark Kimberling_, Dec 27 2013