OFFSET
1,1
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..134
PROG
(Python)
from collections import Counter
from sympy import prime
def A348247(n):
c, b, p, i = Counter(), 1, prime(n), 1
while True:
k, kb = 1, b
while c[kb] >= kb:
k += 1
kb += b
if kb == p:
return i
c[kb] += 1
b = k
i += 1 # Chai Wah Wu, Oct 21 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 17 2021
EXTENSIONS
More terms from Chai Wah Wu, Oct 21 2021
STATUS
approved