OFFSET
1,1
PROG
(PARI) f(n) = my(k=2*n-1, m=1); while(!isprime(k*2^m-1), m++); m; \\ A108129
a(n) = sum(k=1, n, a(k));
CROSSREFS
KEYWORD
nonn
AUTHOR
Jorge Coveiro, Jun 04 2005
EXTENSIONS
a(14) and following corrected by Georg Fischer, Dec 26 2022
Offset 1 from Michel Marcus, Dec 26 2022
STATUS
approved