cp's OEIS Frontend

A348247 Where prime(n) first appears in A307730.

%I A348247 #14 Oct 22 2021 11:21:30
%S A348247 2,4,47,52,1374,1385,3738,3755,6680,6703,84626,84657,89480,89521,
%T A348247 91832,91879,173092,173151,192882,192949,524587,524660,865301,865384,
%U A348247 876543,876640,890479,890582,904273,904382,918859,918986,1628979,1629116,1647107,1647256,1666775
%N A348247 Where prime(n) first appears in A307730.
%H A348247 Chai Wah Wu, <a href="/A348247/b348247.txt">Table of n, a(n) for n = 1..134</a>
%o A348247 (Python)
%o A348247 from collections import Counter
%o A348247 from sympy import prime
%o A348247 def A348247(n):
%o A348247     c, b, p, i = Counter(), 1, prime(n), 1
%o A348247     while True:
%o A348247         k, kb = 1, b
%o A348247         while c[kb] >= kb:
%o A348247             k += 1
%o A348247             kb += b
%o A348247         if kb == p:
%o A348247             return i
%o A348247         c[kb] += 1
%o A348247         b = k
%o A348247         i += 1 # _Chai Wah Wu_, Oct 21 2021
%Y A348247 Cf. A307720, A307730, A307632, A348246.
%K A348247 nonn
%O A348247 1,1
%A A348247 _N. J. A. Sloane_, Oct 17 2021
%E A348247 More terms from _Chai Wah Wu_, Oct 21 2021