The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A300237 a(n) = n - A286594(n) = n - A285721(n, sigma(n)). 6

%I

%S 1,0,0,0,0,5,0,0,3,5,0,8,0,9,11,0,0,11,0,9,9,16,0,21,15,20,12,27,0,25,

%T 0,0,26,27,26,23,0,31,30,35,0,36,0,33,38,38,0,41,35,36,44,41,0,47,44,

%U 48,42,49,0,54,0,53,51,0,55,58,0,57,61,50,0,63,0,64,62,67,54,69,0,63,39,71,0,80,74,75,79,65,0,85,84,83,77,82,87,90,0,81

%N a(n) = n - A286594(n) = n - A285721(n, sigma(n)).

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

%H Antti Karttunen, <a href="/A286594/a286594.txt">Scheme (Racket) program to compute this sequence</a>

%F a(n) = n - A286594(n) = n - A285721(n, A000203(n)).

%o (PARI)

%o A285721(n,k) = if(n==k, 0, 1 + A285721(abs(n-k),min(n,k)));

%o A286594(n) = A285721(n,sigma(n));

%o A300237(n) = (n - A286594(n));

%Y Cf. A000203, A285721, A286594.

%Y Cf. also A300227, A300228, A300234, A300238.

%K nonn

%O 1,6

%A _Antti Karttunen_, Mar 02 2018

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

Last modified July 25 09:18 EDT 2021. Contains 346286 sequences. (Running on oeis4.)