This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A161217 #16 Jun 24 2021 13:42:27
%S A161217 0,4,12,32,56,128,192,400,640,1232,2304,4496,8608,16960,33456,66304,
%T A161217 132096,263168,526320,1049872,2100352,4196480,8393904,16779152,
%U A161217 33565952,67111488,134235840,268441424,536906720,1073744960,2147560704,4294970896,8590069760
%N A161217 a(n) = Sum_{d|n} phi(n/d)^2*2^(d+1).
%F A161217 a(n) = 2*A160620(n). - _Jon Maiga_ / _Georg Fischer_, Jun 22 2021
%p A161217 a:= proc(n) uses numtheory;
%p A161217 add(phi(n/d)^2*2^(d+1), d=divisors(n))
%p A161217 end:
%p A161217 seq(a(n), n=0..32); # _Alois P. Heinz_, Jun 24 2021
%o A161217 (PARI) a(n) = if (n, sumdiv(n, d, eulerphi(n/d)^2*2^(d+1)), 0); \\ _Michel Marcus_, Jun 24 2021
%Y A161217 Cf. A000010, A053635, A160620.
%K A161217 nonn
%O A161217 0,2
%A A161217 _N. J. A. Sloane_, Nov 21 2009