login
A116457
a(1) = 1; a(n) = prime((a(n-1)+3)/2).
3
1, 3, 5, 7, 11, 17, 29, 53, 107, 257, 733, 2503, 10211, 49739, 285377, 1909561, 14736529, 129812899, 1293238351, 14448382721, 179668662139, 2470072307533, 37316454626819, 616134609058513, 11063579025874439, 215090680142673151, 4509111056049997289
OFFSET
1,2
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
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Feb 16 2006
EXTENSIONS
More terms from Harvey P. Dale, Apr 01 2019
a(24)-a(27) from Amiram Eldar, Jul 15 2025
STATUS
approved