A345048 a(n) = A342001(n) * A051709(n).

0, 0, 0, 2, 0, 10, 0, 9, 2, 14, 0, 64, 0, 18, 16, 28, 0, 63, 0, 120, 20, 26, 0, 220, 2, 30, 12, 192, 0, 620, 0, 75, 28, 38, 24, 310, 0, 42, 32, 442, 0, 984, 0, 384, 156, 50, 0, 616, 2, 117, 40, 504, 0, 270, 32, 736, 44, 62, 0, 2944, 0, 66, 238, 186, 36, 1952, 0, 792, 52, 1652, 0, 975, 0, 78, 154, 960, 36, 2556, 0, 1276, 52

Offset

1,4

Links

Table of n, a(n) for n=1..81.

Formula

a(n) = A342001(n) * A051709(n).

a(n) = A345049(n) + A345050(n).

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));
A051709(n) = ((sigma(n) + eulerphi(n)) - (2*n));
A345048(n) = (A342001(n) * A051709(n));

Crossrefs

Cf. A345049, A345050, A345051.

Sequence in context: A213322 A374288 A368703 * A151887 A337056 A362994

Adjacent sequences: A345045 A345046 A345047 * A345049 A345050 A345051

Keyword

nonn

Author

Antti Karttunen, Jun 06 2021

Status

approved