OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = Sum_{prime(n) < j < prime(n+1)} A001414(j).
EXAMPLE
MAPLE
PROG
(PARI) sopfr(n) = my(f=factor(n)); sum(k=1, #f~, f[k, 1]*f[k, 2]);
a(n) = sum(k=prime(n)+1, prime(n+1)-1, sopfr(k)); \\ Michel Marcus, May 31 2019
(Python)
from sympy import prime, factorint
def A308485(n): return sum(p*e for m in range(prime(n)+1, prime(n+1)) for p, e in factorint(m).items()) # Chai Wah Wu, Apr 01 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, May 30 2019
STATUS
approved