OFFSET
1,1
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..3321
Dennis S. Bernstein, Omran Kouba, Counting Colorful Necklaces and Bracelets in Three Colors, arXiv:1901.10703 [math.CO], 2019.
FORMULA
a(n) = 2 * n * A000013(n). - Seiichi Manyama, Jul 14 2023
MAPLE
See A306888.
MATHEMATICA
Table[DivisorSum[n, 2^# *EulerPhi[2 n/#] &], {n, 36}] (* Michael De Vlieger, Mar 18 2019 *)
PROG
(PARI) a(n) = sumdiv(n, d, 2^d*eulerphi(2*n/d)); \\ Michel Marcus, Mar 16 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Michael De Vlieger and N. J. A. Sloane, Mar 15 2019
STATUS
approved