login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A082993 a(1) = 2; a(n+1) = least prime > a(1)*a(2)*...*a(n). 2

%I #12 Jan 22 2021 16:27:27

%S 2,3,7,43,1811,3270667,10697259354227,114431357691543566765996431,

%T 13094535623129987017538646614449662873664453962870113

%N a(1) = 2; a(n+1) = least prime > a(1)*a(2)*...*a(n).

%H Hugo Pfoertner, <a href="/A082993/b082993.txt">Table of n, a(n) for n = 1..13</a>

%t Module[{prod=2,nx,ls={2}},Do[nx=NextPrime[prod];prod=prod*nx;AppendTo[ ls,nx],{10}];ls] (* _Harvey P. Dale_, Jul 07 2013 *)

%t nxt[{p_,a_}]:=Module[{c=NextPrime[p]},{p*c,c}]; NestList[nxt,{2,2},10][[All,2]] (* _Harvey P. Dale_, Jun 10 2020 *)

%Y Cf. A340505.

%K nonn

%O 1,1

%A _Joseph L. Pe_, May 29 2003

%E Two more terms from _Zak Seidov_, Oct 16 2006

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 03:41 EDT 2024. Contains 371264 sequences. (Running on oeis4.)