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 A229992 #5 Oct 11 2013 21:21:01
%S A229992 2,3,5,6,7,8,10,12,13,14,16,17,20,21,25,26,28,29,31,33,35,39,41,43,44,
%T A229992 45,49,51,52,57,60,64,67,69,70,81,83,85,89,90,91,97,98,104,109,113,
%U A229992 116,118,120,131,134,136,140,142,144,145,148,152,157,171,173
%N A229992 Numbers for which A061214(n) + 1 is prime, where A061214(n) = product of composite numbers between prime(n) and prime(n+1) .
%e A229992 a(2) = 2 because 4 + 1 is prime; a(3) = 3 because 6 + 1 is prime; 4 is not in A229992 because 8*9*10 + 1 is not prime.
%t A229992 q[n_] := Product[k, {k, Prime[n] + 1, Prime[n + 1] - 1}]; c[n_] := If[PrimeQ[q[n] + 1], 1, 0]; t = Table[c[n], {n, 1, 230}]; u = Rest[Flatten[Position[t, 1]]]
%Y A229992 Cf. A061214, A229992.
%K A229992 nonn
%O A229992 2,1
%A A229992 _Clark Kimberling_, Oct 09 2013