OFFSET
1,2
COMMENTS
Corresponding primes: 3,5,7,13,19,29,31,37,43,53,59,61,67,73, ...
LINKS
Zak Seidov, Table of n, a(n) for n = 1..1000
MATHEMATICA
s={1}; a=2; Do[While[!PrimeQ[ 2a+1], a=a+2]; AppendTo[s, a]; a++, {999}]; s
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Aug 14 2012
STATUS
approved