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 A051312 #25 Oct 07 2023 05:25:17
%S A051312 19,2,3,5,571,271,457,397,1123,23,103,42572757267735264511,313,17,
%T A051312 16013177,7951,1259,41,1531,11,83,53,67,7,21397,13,1619,1274209367143,
%U A051312 433,37,491,29,658837,135202080527,163,587,31,2797,35286479
%N A051312 Euclid-Mullin sequence (A000945) with initial value a(1)=19 instead of a(1)=2.
%H A051312 Tyler Busby, <a href="/A051312/b051312.txt">Table of n, a(n) for n = 1..50</a> (terms 1..42 from Robert Price)
%t A051312 a[1]=19; a[n_] := First[ Flatten[ FactorInteger[ 1+Product[ a[ j ], {j, 1, n-1} ] ] ] ]; Array[a, 10]
%o A051312 (PARI) spf(n)=factor(n)[1, 1]
%o A051312 first(m)=my(v=vector(m)); v[1]=19; for(i=2, m, v[i]=spf(1+prod(j=1, i-1, v[j]))); v; \\ _Anders Hellström_, Aug 31 2015
%Y A051312 Cf. A000945, A000946, A005265, A005266.
%K A051312 nonn
%O A051312 1,1
%A A051312 _Labos Elemer_