login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A051309 Euclid-Mullin sequence (A000945) with initial value a(1)=11 instead of a(1)=2. 5
11, 2, 23, 3, 7, 10627, 433, 17, 13, 10805892983887, 73, 6397, 19, 489407, 2753, 87491, 18618443, 5, 31, 113, 41, 10723, 35101153, 25243, 374399, 966011, 293821591198219762366057, 234947, 4729, 27953, 3256171, 331, 613, 67, 272646324430637, 34281113, 21050393332691947013, 61, 97 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..39.

A. R. Booker, S. A. Irvine, The Euclid-Mullin graph, arXiv preprint arXiv:1508.03039, 2015

MATHEMATICA

a[1]=11; a[n_] := First[ Flatten[ FactorInteger[ 1+Product[ a[ j ], {j, 1, n-1} ] ] ] ]; Array[a, 10]

PROG

(PARI) lpf(n)=factor(n)[1, 1]

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;

\\ Anders Hellström, Aug 22 2015

CROSSREFS

Cf. A000945, A000946, A005265, A005266.

Sequence in context: A040120 A176592 A336904 * A077344 A298439 A095157

Adjacent sequences:  A051306 A051307 A051308 * A051310 A051311 A051312

KEYWORD

nonn

AUTHOR

Labos Elemer

EXTENSIONS

Corrected and extended by Sean A. Irvine, Apr 13 2008

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 24 01:24 EDT 2021. Contains 346269 sequences. (Running on oeis4.)