OFFSET
1,1
COMMENTS
It seems reasonable that a(n)/A079149(n) has an asymptote that could be estimated. - Peter Munn, Aug 21 2023
LINKS
T. D. Noe, Table of n, a(n) for n = 1..3492 (terms less than 2*10^9)
MAPLE
N:= 5000:
primes, comps:= selectremove(isprime, {$2..N}):
M:= nops(comps):
X:= primes:
for n from 1 to floor(sqrt(2*N)) do
i:= 1;
T:= add(comps[k], k=1..n);
while T <= N do
X := X minus {T};
if i + n > M then break fi;
T := T + comps[i+n] - comps[i];
i := i+1;
od;
od:
X;
# Robert Israel, Jun 24 2008
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Jud McCranie, Jul 12 2000
Corrected by T. D. Noe, Aug 15 2008
STATUS
approved