A364850 - OEIS

%I #18 Apr 11 2024 15:56:32

%S -1,1,3,1,10,-1,21,1,3,-2,55,-1,78,-3,-4,1,136,-1,171,-2,-6,-5,253,-1,

%T 10,-6,3,-3,406,4,465,1,-10,-8,-12,-1,666,-9,-12,-2,820,6,903,-5,-4,

%U -11,1081,-1,21,-2,-16,-6,1378,-1,-20,-3,-18,-14,1711,4

%N a(n) = negated numerator of A014963(n)*A023900(n)/2.

%F a(n) = - numerator of A014963(n)*A023900(n)/2.

%t Numerator[Table[- Exp[MangoldtLambda[n]] * Total[MoebiusMu[Divisors[n]]*Divisors[n]]/2, {n, 1, 60}]]

%Y Cf. A014963, A023900.

%K frac,sign

%O 1,3

%A _Mats Granvik_, Aug 10 2023

%E Definition corrected by _Georg Fischer_, Apr 11 2024