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!)
A056757 Cube of number of divisors is larger than the number. 20

%I #25 Jan 26 2022 07:21:07

%S 2,3,4,5,6,7,8,9,10,12,14,15,16,18,20,21,22,24,25,26,27,28,30,32,33,

%T 34,35,36,38,39,40,42,44,45,46,48,50,51,52,54,55,56,57,58,60,62,63,64,

%U 66,68,70,72,75,76,78,80,81,84,88,90,92,96,98,99,100,102,104,105,108,110

%N Cube of number of divisors is larger than the number.

%C Sequence is finite with 50967 terms. - _Charles R Greathouse IV_, Apr 27 2011

%C The last odd term is a(15199) = 883575. The odd terms are in A056761. - _T. D. Noe_, May 14 2013

%H Charles R Greathouse IV, <a href="/A056757/b056757.txt">Table of n, a(n) for n = 1..50967</a> (complete sequence)

%F { k : A000005(k)^3 > k}.

%e k = 27935107200 = 128*27*25*7*11*13*17*19 has 3072 divisors, 3072^3/k = 1.03779..., so k is a term.

%t t = {}; Do[If[n < DivisorSigma[0,n]^3, AppendTo[t, n]], {n, 10^3}]; t (* _T. D. Noe_, May 14 2013 *)

%t Select[Range[120],DivisorSigma[0,#]^3>#&] (* _Harvey P. Dale_, Apr 22 2019 *)

%o (PARI) is(n)=numdiv(n)^3>n \\ _Charles R Greathouse IV_, Sep 14 2015

%Y Cf. A034884, A035033-A035035.

%Y Cf. A175495 (n < 2^d(n)), A225729-A225738.

%K fini,full,nonn

%O 1,1

%A _Labos Elemer_, Aug 16 2000

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 29 00:26 EDT 2024. Contains 371264 sequences. (Running on oeis4.)