Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A128699
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A128699 Highly abundant numbers that are not superabundant i.e. The complement of A002093 and A004394. +0
3
3, 8, 10, 16, 18, 20, 30, 42, 72, 84, 90, 96, 108, 144, 168, 210, 216, 288, 300, 336, 420, 480, 504, 540, 600, 630, 660, 960, 1008, 1080, 1200, 1440, 1560, 1620, 1800, 1920, 1980, 2100, 2160, 2340, 2400, 2880, 3024, 3120, 3240, 3360, 3600, 3780, 3960, 4200 (list; graph; listen)
OFFSET

1,1

COMMENT

In 1944, Alaoglu and Erdos conjectured that this sequence was infinite, and this was proved to be true by Nicolas in 1969.

REFERENCES

Alaoglu, L., Erdos, P.; On Highly Composite and Similar Numbers, Transactions of the American Mathematical Society, Vol. 56, No. 3, (November 1944), pp. 448-469.

Nicolas, Jean-Louis; Ordre maximal d'un element du groupe Sn des permutations et "highly composite numbers". Bull. Soc. Math. France 97: (1969), pp. 129-191.

LINKS

Eric Weisstein's World of Mathematics, Superabundant Number.

Wikepedia, Highly Abundant Numbers.

FORMULA

The highly abundant numbers are those integers for which sigma(n) > sigma(m) for all m < n (A002093), and the superabundant numbers are those integers for which sigma(n)/n > sigma(m)/m for all m<n (A004394).

EXAMPLE

The sequence of highly abundant numbers begins 1, 2, 3, 4, 6, 8, 10, 12, 16, 18, 20 and the sequence of superabundant numbers begins 1, 2, 4, 6, 12, 24. Because 10 is the third number which is in the first sequence but not in the second, it follows that a(3)=10.

MATHEMATICA

habdata1=FoldList[Max, 1, Table[DivisorSigma[1, n], {n, 2, 10000}]]; data1=Flatten[Position[habdata1, #, 1, 1]&/@Union[habdata1]]; sabdata2=FoldList[Max, 1, Table[DivisorSigma[1, n]/n, {n, 2, 10000}]]; data2=Flatten[Position[sabdata2, #, 1, 1]&/@Union[sabdata2]]; sabdata2=FoldList[Max, 1, Table[DivisorSigma[1, n]/n, {n, 2, 10000}]]; Complement[data1, data2]

CROSSREFS

Cf. A002093, A004394, A000203, A128700, A128701, A128702.

Sequence in context: A083246 A023492 A022801 this_sequence A104816 A020488 A064435

Adjacent sequences: A128696 A128697 A128698 this_sequence A128700 A128701 A128702

KEYWORD

nonn

AUTHOR

Ant King (mathstutoring(AT)ntlworld.com), Mar 28 2007

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified July 23 17:35 EDT 2008. Contains 142285 sequences.


AT&T Labs Research