OFFSET
1,1
COMMENTS
Sequence is finite with 51261 terms. - Charles R Greathouse IV, Apr 27 2011 [Corrected by Amiram Eldar, Jun 02 2024]
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..51261 (complete sequence, corrected by Amiram Eldar)
FORMULA
{ k : A000005(k)^3 > k}.
EXAMPLE
k = 27935107200 = 128*27*25*7*11*13*17*19 has 3072 divisors, 3072^3/k = 1.03779..., so k is a term.
MATHEMATICA
t = {}; Do[If[n < DivisorSigma[0, n]^3, AppendTo[t, n]], {n, 10^3}]; t (* T. D. Noe, May 14 2013 *)
Select[Range[120], DivisorSigma[0, #]^3>#&] (* Harvey P. Dale, Apr 22 2019 *)
PROG
(PARI) is(n)=numdiv(n)^3>n \\ Charles R Greathouse IV, Sep 14 2015
CROSSREFS
KEYWORD
fini,full,nonn
AUTHOR
Labos Elemer, Aug 16 2000
STATUS
approved