OFFSET
1,1
COMMENTS
Numbers n for which A086134(n) = 3.
Numbers whose arithmetic derivative is an odd multiple of 3.
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..10000
PROG
(PARI)
A003415(n) = {my(fac); if(n<1, 0, fac=factor(n); sum(i=1, matsize(fac)[1], n*fac[i, 2]/fac[i, 1]))}; \\ From A003415
isA327933(n) = (3==A086134(n));
(Python)
from itertools import count, islice
from sympy import factorint
def A327933_gen(startvalue=2): # generator of terms >= startvalue
return filter(lambda n: (m:=sum((n*e//p for p, e in factorint(n).items())))&1 and not m%3, count(max(startvalue, 2)))
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Sep 30 2019
STATUS
approved
