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!)
A088010 Odd numbers n such that abs(sigma(n)-2n) <= n^(1/3). Abundance-radius = abs(sigma(n)-2n) does not exceed cubic root of n and n is odd. 4
1, 315, 1155, 8415, 8925, 31815, 32445, 33705, 34335, 78975, 351351, 430815, 437745, 442365, 449295, 730125, 1805475, 7667625, 13800465, 14571585, 16029405, 16286445, 20297745, 20355825, 20487159, 21003885, 22982505, 23082885 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
MATHEMATICA
abu[x_] := Abs[DivisorSigma[1, x]-2*x] Do[If[ !Greater[abu[n], n^(1/3)//N]&&OddQ[n], Print[n]], {n, 1, 100000}]
PROG
(PARI) isok(n) = (n % 2) && (abs(sigma(n)-2*n) < sqrtn(n, 3)); \\ Michel Marcus, Nov 10 2017
CROSSREFS
Sequence in context: A087415 A184477 A184469 * A145753 A184468 A231760
KEYWORD
nonn
AUTHOR
Labos Elemer, Oct 20 2003
EXTENSIONS
a(17)-a(28) from Donovan Johnson, Feb 01 2009
STATUS
approved

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 28 04:05 EDT 2024. Contains 371235 sequences. (Running on oeis4.)