login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS").
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A300237 a(n) = n - A286594(n) = n - A285721(n, sigma(n)). 6
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, 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, 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 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,6

LINKS

Antti Karttunen, Table of n, a(n) for n = 1..65537

Antti Karttunen, Scheme (Racket) program to compute this sequence

FORMULA

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

PROG

(PARI)

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

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

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

CROSSREFS

Cf. A000203, A285721, A286594.

Cf. also A300227, A300228, A300234, A300238.

Sequence in context: A099224 A136598 A193524 * A105077 A073231 A099223

Adjacent sequences:  A300234 A300235 A300236 * A300238 A300239 A300240

KEYWORD

nonn

AUTHOR

Antti Karttunen, Mar 02 2018

STATUS

approved

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified December 15 12:02 EST 2018. Contains 318148 sequences. (Running on oeis4.)