id:A065545 - OEIS Search Results

Search: id:A065545

Displaying 1-1 of 1 results found.

page 1

a(n) is smallest prime > 2*a(n-1), a(1) = 3.

+0
2

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 (list; graph; listen)

	OFFSET	`1,1`
	MATHEMATICA	`NextPrim[n_Integer] := Block[ {k = n + 1}, While[ !PrimeQ[k], k++ ]; Return[k]]; a[1] = 13; a[n_] := NextPrim[ 2*a[n - 1]]; Table[ a[n], {n, 1, 20} ]`
	CROSSREFS	`Adjacent sequences: A065542 A065543 A065544 this_sequence A065546 A065547 A065548` `Sequence in context: A014314 A089099 A089116 this_sequence A110930 A026646 A026668`
	KEYWORD	`nonn`
	AUTHOR	`Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 28 2001`

page 1

Search completed in 0.002 seconds

Last modified October 13 20:18 EDT 2008. Contains 145016 sequences.

AT&T Labs Research