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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A336917 Number of iterations of x -> A252463(x) needed before the result is deficient, when starting from x=n. 2
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 3, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 2, 0, 1, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 1, 0, 2, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 3, 0, 0, 0, 0, 0, 1, 0, 3, 0, 0, 0, 2, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 5, 0, 0, 0, 1, 0, 1, 0, 1, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,12

LINKS

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

FORMULA

For all n >= 0, a(A007283(n)) = n.

EXAMPLE

For n = 945, the first odd abundant number, the iteration of A252463 proceeds as 945 -> 120 -> 60 -> 30 -> 15 -> 6 -> 3 -> 2 -> 1. From 945 to 30, all are nondeficient (sigma(k) >= 2k), and only at 15 we encounter the first deficient number, as sigma(15) = 24 < 2*15. Therefore a(945) = 4.

PROG

(PARI)

A064989(n) = {my(f); f = factor(n); if((n>1 && f[1, 1]==2), f[1, 2] = 0); for (i=1, #f~, f[i, 1] = precprime(f[i, 1]-1)); factorback(f)};

A252463(n) = if(!(n%2), n/2, A064989(n));

A336917(n) = { my(i=0); while(sigma(n) >= (2*n), n = A252463(n); i++); (i); };

CROSSREFS

Cf. A005100, A007283, A023196, A064989, A252463, A294934, A336389, A336834, A336835, A336915.

Sequence in context: A321379 A070141 A088722 * A122180 A033772 A086015

Adjacent sequences:  A336914 A336915 A336916 * A336918 A336919 A336920

KEYWORD

nonn

AUTHOR

Antti Karttunen, Aug 08 2020

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 July 28 19:33 EDT 2021. Contains 346335 sequences. (Running on oeis4.)