A348780 Partial sums of A347113.

1, 5, 15, 37, 83, 177, 182, 184, 190, 204, 207, 215, 227, 253, 262, 277, 295, 333, 346, 353, 369, 403, 423, 447, 477, 539, 560, 571, 598, 630, 666, 740, 765, 793, 851, 969, 986, 1019, 1059, 1141, 1307, 1641, 1676, 1715, 1757, 1843, 1872, 1916, 1964, 2020, 2039, 2084, 2107, 2157, 2211, 2271, 2393

Offset: 1

Author

N. J. A. Sloane, Nov 13 2021

Keywords

• nonn

Comments

Needs an estimate for the asymptotic growth rate.

Links

• Stefano Spezia, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A347113.

Programs

Python

from math import gcd
def A348780(n):
    j, nset, m, s = 2, {1}, 2, 1
    for _ in range(n-1):
        k = m
        while k == j or gcd(k,j) == 1 or k in nset:
            k += 1
        j = k+1
        s += k
        nset.add(k)
        while m in nset:
            m += 1
    return s # Chai Wah Wu, Nov 13 2021