A090253 - OEIS

A090253

a(1) = 2, a(2) = 3, a(n) = least prime greater than the product of two previous terms.

2, 3, 7, 23, 163, 3761, 613049, 2305677323, 1413493177187867, 3259059164857285852640107, 4606657893577361399569662402327877981883, 15013370627425459052324121468319040208855976676229499210665181583

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

MAPLE

a:=proc(n) if n=1 then 2 elif n=2 then 3 else nextprime(a(n-1)*a(n-2)) fi end: seq(a(n), n=1..13); # Emeric Deutsch, Feb 26 2005

MATHEMATICA

nxt[{a_, b_}]:={b, NextPrime[a*b]}; Transpose[NestList[nxt, {2, 3}, 15]] [[1]] (* Harvey P. Dale, Nov 24 2015 *)

CROSSREFS

Sequence in context: A098544 A176706 A281529 * A001064 A108176 A111235

Adjacent sequences: A090250 A090251 A090252 * A090254 A090255 A090256

KEYWORD

nonn

AUTHOR

Amarnath Murthy, Nov 27 2003

EXTENSIONS

More terms from Emeric Deutsch, Feb 26 2005

STATUS

approved