cp's OEIS Frontend

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.

A051309 Euclid-Mullin sequence (A000945) with initial value a(1)=11 instead of a(1)=2.

This page as a plain text file.
%I A051309 #22 Jan 13 2024 11:47:00
%S A051309 11,2,23,3,7,10627,433,17,13,10805892983887,73,6397,19,489407,2753,
%T A051309 87491,18618443,5,31,113,41,10723,35101153,25243,374399,966011,
%U A051309 293821591198219762366057,234947,4729,27953,3256171,331,613,67,272646324430637,34281113,21050393332691947013,61,97
%N A051309 Euclid-Mullin sequence (A000945) with initial value a(1)=11 instead of a(1)=2.
%H A051309 A. R. Booker and S. A. Irvine, <a href="http://arxiv.org/abs/1508.03039">The Euclid-Mullin graph</a>, arXiv preprint arXiv:1508.03039 [math.NT], 2015-2016.
%t A051309 a[1]=11; a[n_] := First[ Flatten[ FactorInteger[ 1+Product[ a[ j ], {j, 1, n-1} ] ] ] ]; Array[a,10]
%o A051309 (PARI) lpf(n)=factor(n)[1,1]
%o A051309 first(m)=my(v=vector(m)); v[1]=11; for(i=2, m, v[i]=lpf(1+prod(j=1, i-1, v[j]))); v;
%o A051309 \\ _Anders Hellström_, Aug 22 2015
%Y A051309 Cf. A000945, A000946, A005265, A005266.
%K A051309 nonn
%O A051309 1,1
%A A051309 _Labos Elemer_
%E A051309 Corrected and extended by _Sean A. Irvine_, Apr 13 2008