close
login
A390608
a(n) = phi(n) * omega(n).
3
0, 1, 2, 2, 4, 4, 6, 4, 6, 8, 10, 8, 12, 12, 16, 8, 16, 12, 18, 16, 24, 20, 22, 16, 20, 24, 18, 24, 28, 24, 30, 16, 40, 32, 48, 24, 36, 36, 48, 32, 40, 36, 42, 40, 48, 44, 46, 32, 42, 40, 64, 48, 52, 36, 80, 48, 72, 56, 58, 48, 60, 60, 72, 32, 96, 60, 66, 64, 88, 72
OFFSET
1,3
COMMENTS
a(n) is the number of positive integers which are coprime to n multiplied by the number of distinct primes dividing n.
a(n) = phi(n) iff n is in A246655.
a(n) = cototient(n) iff n is in A007694.
a(n) = sigma(n) iff n is in A073567.
a(n) = usigma(n) iff n is in A063795.
LINKS
FORMULA
a(n) = A000010(n) * A001221(n).
a(n) = A122411(n) - A116512(n).
a(n) = Sum_{d|n} f(d) * phi(n/d), where f(n) = A014963(n) - 1.
a(n) = Sum_{d|n, d is a prime power} A057237(d) * phi(n/d).
a(n) is neither multiplicative nor additive, but it satisfies the mixed relation:
a(n*m) = phi(n) * a(m) + phi(m) * a(n), for all n, m such that gcd(n,m) = 1.
Dirichlet g.f.: zeta(s-1)/zeta(s) * Sum_{p prime} (p-1)/(p^s-1).
EXAMPLE
a(30) = phi(30)*omega(30) = 8*3 = 24.
MAPLE
with(numtheory): seq(phi(n)*nops(factorset(n)), n=1..120);
MATHEMATICA
Table[EulerPhi[n]*PrimeNu[n], {n, 1, 120}]
PROG
(PARI) a(n) = my(f=factor(n)); eulerphi(f)*omega(f); \\ Michel Marcus, Nov 12 2025
KEYWORD
nonn,easy
AUTHOR
Ridouane Oudra, Nov 12 2025
STATUS
approved