cp's OEIS Frontend

A347308 Indices of records in A347113.

%I A347308 #25 Sep 06 2021 15:45:42
%S A347308 1,2,3,4,5,6,36,41,42,90,91,92,93,94,519,1044,1251,1252,1422,2748,
%T A347308 3591,6528,10685,11661,12028,12236,17326,19899,20074,22571,26429,
%U A347308 27702,30538,43975,54016,54017,54229,61703,63862,63863,127935,127936,269513,297679,342675
%N A347308 Indices of records in A347113.
%H A347308 Chai Wah Wu, <a href="/A347308/b347308.txt">Table of n, a(n) for n = 1..54</a>
%o A347308 (Python)
%o A347308 from math import gcd
%o A347308 A347308_list, nset, m, c, j, i = [1], {1}, 2, 0, 2, 1
%o A347308 for _ in range(10**4):
%o A347308     i += 1
%o A347308     k = m
%o A347308     while k == j or gcd(k,j) == 1 or k in nset:
%o A347308         k += 1
%o A347308     if k > c:
%o A347308         c = k
%o A347308         A347308_list.append(i)
%o A347308     j = k + 1
%o A347308     nset.add(k)
%o A347308     while m in nset:
%o A347308         m += 1 # _Chai Wah Wu_, Sep 01 2021
%Y A347308 Cf. A347113, A347306, A347307.
%K A347308 nonn
%O A347308 1,2
%A A347308 _N. J. A. Sloane_, Sep 01 2021
%E A347308 a(23)-a(40) from _Alois P. Heinz_, Sep 01 2021
%E A347308 a(41)-a(42) from _Chai Wah Wu_, Sep 01 2021
%E A347308 a(43)-a(45) from _Chai Wah Wu_, Sep 02 2021