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 A216205 #9 Mar 14 2013 12:16:14
%S A216205 0,1,2,6,8,19,94,226,2277,2742,2868
%N A216205 Incidences of n such that A006862(n) - n! is prime where A006862 are the Euclid numbers.
%e A216205 a(3) = 6 because A006862(6) - 6! = 30031-720 = 29311 and is the 3rd such prime.
%t A216205 primeproduct[q_] := Product[Prime[r], {r, 1, q}]; nextterm[n_] := (p=n+1; While[!PrimeQ[primeproduct[p]+1-p!], p++]; p); Table[Nest[nextterm, 0, m], {m, 1, 5}] (* changing 5 to 10 will give all 10 terms but takes a long time *)
%Y A216205 Cf. A006862, A014545.
%K A216205 nonn,more
%O A216205 0,3
%A A216205 _Frank M Jackson_, Mar 12 2013