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!)
A084573 Let a(1)=1; for n>1, a(n)=nextprime( a(n-1)^(n/(n-1)) ). 0
1, 2, 3, 5, 11, 19, 37, 67, 127, 223, 383, 659, 1151, 1987, 3433, 5923, 10211, 17579, 30259, 52103, 89689, 154387, 265747, 457421, 787357, 1355261, 2332783, 4015339, 6911461, 11896457, 20476933, 35246203, 60668017, 104425627, 179743997 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
Limit of a(n+1)/a(n) -> 1.7212631438796...
LINKS
MATHEMATICA
RecurrenceTable[{a[1]==1, a[n]==NextPrime[a[n-1]^(n/(n-1))]}, a, {n, 40}] (* Harvey P. Dale, Mar 29 2013 *)
PROG
(PARI) a(n)=if(n<2, 1, nextprime(a(n-1)^(n/(n-1)))); for(n=1, 50, print1(a(n), ", "))
CROSSREFS
Sequence in context: A070865 A084697 A037082 * A155954 A358717 A337347
KEYWORD
nonn
AUTHOR
Paul D. Hanna, May 31 2003
EXTENSIONS
Wrong formula removed by Paul D. Hanna, May 29 2010
STATUS
approved

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 28 18:04 EDT 2024. Contains 371254 sequences. (Running on oeis4.)