OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
Table[ DivisorSigma[ 0, DivisorSigma[ 1, w ]+EulerPhi[ w ] ], {w, 1, 128} ]
PROG
(PARI) a(n) = numdiv(sigma(n)+eulerphi(n)); \\ Michel Marcus, Aug 13 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jan 17 2002
STATUS
approved