OFFSET
1,1
EXAMPLE
108 is a term since sigma(108) = 280 = 216 + 36 + 28 = psi(108) + phi(108) + pi(108).
PROG
(PARI) dedpsi(f) = prod(k = 1, #f~, (f[k, 1]+1) * f[k, 1]^(f[k, 2]-1));
list(lim) = {my(q = 2, m = 0, f); forprime(p = 3, lim, m++; for(k = q, p-1, f = factor(k); if(sigma(f) == dedpsi(f) + eulerphi(f) + m, print1(k, ", "))); q = p); } \\ Amiram Eldar, Mar 26 2026
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
S. I. Dimitrov, Mar 26 2026
EXTENSIONS
a(4)-a(10) from Amiram Eldar, Mar 26 2026
STATUS
approved
