login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A160619 Sum_{d|n} phi(n/d)*2^(d+1). 2
0, 4, 12, 24, 48, 80, 168, 280, 576, 1080, 2160, 4136, 8448, 16432, 33096, 65760, 131712, 262208, 525672, 1048648, 2099520, 4194960, 8392824, 16777304, 33564096, 67109200, 134234256, 268437672, 536904480, 1073741936, 2147554080, 4294967416, 8590066944 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..1000

FORMULA

a(n) = 4*A034738(n). - Michel Marcus, May 07 2018

MATHEMATICA

a[n_]:= If[n<1, 0, Sum[EulerPhi[n/d] 2^(d+1), {d, Divisors[n]}]]; Table[a[n], {n, 0, 50}] (* G. C. Greubel, May 06 2018 *)

PROG

(PARI) a(n) = sumdiv(n, d, eulerphi(n/d)*2^(d+1)); \\ Michel Marcus, May 07 2018

CROSSREFS

Cf. A034738, A053635, A161219.

Sequence in context: A328225 A192797 A278355 * A330011 A132477 A102651

Adjacent sequences:  A160616 A160617 A160618 * A160620 A160621 A160622

KEYWORD

nonn

AUTHOR

N. J. A. Sloane, Nov 21 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 21 20:10 EDT 2021. Contains 347598 sequences. (Running on oeis4.)