%I #5 Jun 05 2019 21:53:12
%S 0,2,0,6,5,8,4,14,12,9,8,24,13,20,20,30,9,38,16,41,16,0,20,56,30,41,
%T 36,52,29,36,16,54,32,45,32,90,37,56,52,81,41,80,40,80,77,36,32,120,
%U 56,92,36,49,45,116,36,116,64,81,56,164,61,80,100,126,80,0,64,117,80,0,36,194,73,113,120,136,80,164,64,185,0,117,80
%N a(n) = sigma(n) - A008833(sigma(n)).
%H Antti Karttunen, <a href="/A326040/b326040.txt">Table of n, a(n) for n = 1..20000</a>
%H <a href="/index/Si#SIGMAN">Index entries for sequences related to sigma(n)</a>
%F a(n) = A000203(n) - A326039(n) = A000203(n) - A008833(A000203(n)).
%F a(n) = A326055(A000203(n)).
%o (PARI)
%o A008833(n) = (n/core(n));
%o A326039(n) = A008833(sigma(n));
%o A326040(n) = (sigma(n)-A008833(sigma(n)));
%o (PARI)
%o A326055(n) = (n-A008833(n));
%o A326040(n) = A326055(sigma(n));
%Y Cf. A000203, A008833, A326039, A326055.
%K nonn
%O 1,2
%A _Antti Karttunen_, Jun 05 2019
|