login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A318447 a(n) = Sum_{d|n, d<n} A294898(d), where A294898(d) = A005187(d) - sigma(d). 3

%I #7 Aug 27 2018 08:13:58

%S 0,0,0,0,0,0,0,0,0,2,0,-2,0,3,2,0,0,1,0,2,3,7,0,-8,2,9,3,4,0,2,0,0,7,

%T 14,5,-10,0,15,9,-2,0,9,0,12,7,18,0,-22,3,18,14,16,0,6,9,1,15,24,0,

%U -24,0,25,13,0,11,26,0,26,18,25,0,-45,0,33,20,28,10,32,0,-14,13,37,0,-15,16,38,24,13,0,-8,12,34,25,41,17,-52,0

%N a(n) = Sum_{d|n, d<n} A294898(d), where A294898(d) = A005187(d) - sigma(d).

%H Antti Karttunen, <a href="/A318447/b318447.txt">Table of n, a(n) for n = 1..65537</a>

%F a(n) = Sum_{d|n, d<n} A294898(d).

%F a(n) = A318448(n) - A294898(n).

%F a(n) = A318445(n) - A211779(n).

%F a(n) = A296074(n) - A292257(n).

%o (PARI)

%o A005187(n) = { my(s=n); while(n>>=1, s+=n); s; };

%o A294898(n) = (A005187(n) - sigma(n));

%o A318447(n) = sumdiv(n,d,(d<n)*A294898(d));

%Y Cf. A000203, A005187, A211779, A292257, A294898, A296074, A318445, A318448.

%K sign

%O 1,10

%A _Antti Karttunen_, Aug 27 2018

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 08:00 EDT 2024. Contains 371265 sequences. (Running on oeis4.)