login
A347308
Indices of records in A347113.
3
1, 2, 3, 4, 5, 6, 36, 41, 42, 90, 91, 92, 93, 94, 519, 1044, 1251, 1252, 1422, 2748, 3591, 6528, 10685, 11661, 12028, 12236, 17326, 19899, 20074, 22571, 26429, 27702, 30538, 43975, 54016, 54017, 54229, 61703, 63862, 63863, 127935, 127936, 269513, 297679, 342675
OFFSET
1,2
LINKS
PROG
(Python)
from math import gcd
A347308_list, nset, m, c, j, i = [1], {1}, 2, 0, 2, 1
for _ in range(10**4):
i += 1
k = m
while k == j or gcd(k, j) == 1 or k in nset:
k += 1
if k > c:
c = k
A347308_list.append(i)
j = k + 1
nset.add(k)
while m in nset:
m += 1 # Chai Wah Wu, Sep 01 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Sep 01 2021
EXTENSIONS
a(23)-a(40) from Alois P. Heinz, Sep 01 2021
a(41)-a(42) from Chai Wah Wu, Sep 01 2021
a(43)-a(45) from Chai Wah Wu, Sep 02 2021
STATUS
approved