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 A051333 #30 Mar 04 2025 15:27:16 %S A051333 257,2,5,3,11,84811,31,7,1560842137471,20113,17,83,47,339491,7814561, %T A051333 109,2897,16103,70921439,199,1381,34987489236924545883729121,43,241, %U A051333 37,491,28468486915378661,8803,29,25212511,2311,67,3929,1151,192697,797,157,23,1489,13 %N A051333 Euclid-Mullin sequence (A000945) with initial value a(1)=257 instead of a(1)=2. %H A051333 Tyler Busby, <a href="/A051333/b051333.txt">Table of n, a(n) for n = 1..84</a> %t A051333 a[1]=257; a[n_] := First[ Flatten[ FactorInteger[ 1+Product[ a[ j ], {j, 1, n-1} ] ] ] ]; Array[a, 10] %o A051333 (PARI) spf(n)=my(f=factor(n)[1, 1]); f \\ A020639 %o A051333 first(m)=my(v=vector(m)); v[1]=257; for(i=2, m, v[i]=spf(1+prod(j=1, i-1, v[j]))); v \\ _Anders Hellström_, Dec 07 2015 %Y A051333 Cf. A020639, A000945, A000946, A005265, A005266. %K A051333 nonn %O A051333 1,1 %A A051333 _Labos Elemer_ %E A051333 a(22)-a(27) from _Robert Price_, Jul 09 2015 %E A051333 a(28)-a(40) from _Tyler Busby_, Oct 12 2023