login
A306906
a(n) = A306899(n)/6.
1
1, 2, 6, 8, 15, 30, 49, 96, 189, 360, 693, 1416, 2743, 5516, 10980, 21952, 43707, 87642, 174781, 349920, 699216, 1398804, 2796225, 5594112, 11184875, 22372376, 44739810, 89484080, 178956999, 357926040, 715827913, 1431677824, 2863313640
OFFSET
1,2
LINKS
MATHEMATICA
Table[DivisorSum[n, (2^# - (-1)^#) EulerPhi[3 n/#] &]/6, {n, 33}] (* Michael De Vlieger, Dec 01 2019 *)
PROG
(PARI) a(n) = sumdiv(n, d, (2^d - (-1)^d)*eulerphi(3*n/d))/6; \\ Michel Marcus, Mar 16 2019
CROSSREFS
Cf. A306899.
Sequence in context: A066189 A278834 A336896 * A174658 A326300 A266074
KEYWORD
nonn
AUTHOR
STATUS
approved