login
A347234
Dirichlet convolution of A126760 with A342001.
13
0, 1, 1, 3, 1, 7, 1, 6, 3, 10, 1, 17, 1, 13, 11, 10, 1, 16, 1, 26, 14, 18, 1, 31, 4, 21, 6, 35, 1, 61, 1, 15, 19, 26, 17, 36, 1, 29, 22, 49, 1, 82, 1, 50, 28, 34, 1, 49, 5, 36, 27, 59, 1, 28, 22, 67, 30, 42, 1, 139, 1, 45, 37, 21, 25, 117, 1, 74, 35, 127, 1, 63, 1, 53, 40, 83, 25, 138, 1, 79, 10, 58, 1, 190, 30, 61
OFFSET
1,4
FORMULA
a(n) = Sum_{d|n} A126760(d) * A342001(n/d).
PROG
(PARI)
A003415(n) = if(n<=1, 0, my(f=factor(n)); n*sum(i=1, #f~, f[i, 2]/f[i, 1]));
A003557(n) = (n/factorback(factorint(n)[, 1]));
A342001(n) = (A003415(n) / A003557(n));
A126760(n) = {n&&n\=3^valuation(n, 3)<<valuation(n, 2); n%3+n\6*2}; \\ From A126760
A347234(n) = sumdiv(n, d, A126760(d)*A342001(n/d));
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Aug 26 2021
STATUS
approved