A116457 a(1) = 1; a(n) = prime((a(n-1)+3)/2).

1, 3, 5, 7, 11, 17, 29, 53, 107, 257, 733, 2503, 10211, 49739, 285377, 1909561, 14736529, 129812899, 1293238351, 14448382721, 179668662139, 2470072307533, 37316454626819

Offset

1,2

Links

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

Mathematica

a[1]=1; a[n_]:=a[n]=Prime[(a[n-1]+3)/2]; Table[a[n], {n, 20}]
NestList[Prime[(#+3)/2]&, 1, 21] (* Harvey P. Dale, Apr 01 2019 *)

Crossrefs

Cf. A104296, A104298.

Sequence in context: A068811 A145987 A088083 * A037155 A282632 A212912

Adjacent sequences: A116454 A116455 A116456 * A116458 A116459 A116460

Keyword

nonn

Author

Zak Seidov, Feb 16 2006

Extensions

More terms from Harvey P. Dale, Apr 01 2019

Status

approved