A063475 Sum_{d | H(n)} d^2, where H(n) is the Half-Totient function (A023022).

1, 1, 5, 1, 10, 5, 10, 5, 26, 5, 50, 10, 21, 21, 85, 10, 91, 21, 50, 26, 122, 21, 130, 50, 91, 50, 250, 21, 260, 85, 130, 85, 210, 50, 455, 91, 210, 85, 546, 50, 500, 130, 210, 122, 530, 85, 500, 130, 341, 210, 850, 91, 546, 210, 455, 250, 842, 85, 1300, 260, 455, 341

Offset: 3

Author

Jason Earls, Jul 27 2001

Keywords

• nonn

Links

• Harry J. Smith, Table of n, a(n) for n = 3..1000

Crossrefs

Cf. A023022.

Programs

PARI

H(n)=eulerphi(n)/2; j=[]; for(n=3,150,j=concat(j,sumdiv(H(n),d,d^2))); j

PARI

{ for (n=3, 1000, write("b063475.txt", n, " ", sumdiv(eulerphi(n)/2, d, d^2)) ) } \\ Harry J. Smith, Aug 22 2009