A206475 - OEIS

%I #15 Apr 15 2018 21:57:48

%S 0,1,1,1,-2,4,-1,2,-3,6,-4,6,-6,2,3,5,-9,11,-6,0,-2,12,-12,11,-9,8,-2,

%T 10,-20,22,-9,-1,-4,8,-3,15,-18,6,-4,20,-28,30,-12,-2,-6,24,-24,21,

%U -22,11,4,16,-32,20,-10,6,-8,30,-34,36,-30,12,1,5,-28,46

%N First differences of A206369.

%C a(A206368(n)) = 0.

%H Reinhard Zumkeller, <a href="/A206475/b206475.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = A206369(n+1) - A206369(n).

%t (* b = A206369 *) b[n_] := n*DivisorSum[n, LiouvilleLambda[#]/# &];

%t Array[b, 100] // Differences (* _Jean-François Alcover_, Dec 04 2017 *)

%o (Haskell)

%o a206475 n = a206475_list !! (n-1)

%o a206475_list = zipWith (-) (tail a206369_list) a206369_list

%K sign

%O 1,5

%A _Reinhard Zumkeller_, Feb 08 2012