A110930 a(1) = 1; a(n) = nextprime(2*a(n-1)) for n > 1.

1, 3, 7, 17, 37, 79, 163, 331, 673, 1361, 2729, 5471, 10949, 21911, 43853, 87719, 175447, 350899, 701819, 1403641, 2807303, 5614657, 11229331, 22458671, 44917381, 89834777, 179669557, 359339171, 718678369, 1437356741, 2874713497

Offset: 1

Author

Ryan Propper, Sep 23 2005

Keywords

• nonn

Examples

			a(6) = nextprime(2*a(5)) = nextprime(2*37) = nextprime(74) = 79.
		

Links

• G. C. Greubel, Table of n, a(n) for n = 1..1000

Programs

Mathematica

<G. C. Greubel, Oct 19 2017 *)
NestList[NextPrime[2#]&,1,30] (* Harvey P. Dale, Apr 22 2023 *)

Formula

a(n) = A065545(n-1), n>1. - R. J. Mathar, Aug 18 2008