OFFSET
0,4
LINKS
FORMULA
PROG
(PARI) A329031(n) = { my(s=0, m=1, p=2); while(n, if(n%p, m *= p; s += (1/p)); n = n\p; p = nextprime(1+p)); (s*m); };
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 07 2019
STATUS
approved