Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A128702
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A128702 Highly abundant numbers (A002093) that are not Harshad numbers (A005349). +0
3
16, 96, 168, 47880, 85680, 95760, 388080, 458640, 526680, 609840, 637560, 776160, 887040, 917280, 942480, 1219680, 1244880, 1607760, 1774080, 2439360, 3880800, 5266800, 5569200, 6098400, 7761600, 9424800, 12196800, 17907120, 20900880 (list; graph; listen)
OFFSET

1,1

COMMENT

All superabundant numbers (A004394), colossally abundant numbers (A004490), highly composite numbers (A002182) and superior highly composite numbers (A002201) are Harshad numbers. However, this is not true of the highly abundant numbers (A002093) and there are 32 exceptions in the 394 highly abundant numbers less than 50 million.

The previous comment is erroneous. The first superabundant number that is not a Harshad number is A004394(105) = 149602080797769600. The first highly composite number that is not a Harshad number is A002182(61) = 245044800. For all exceptions I found, the sum of digits is a power of 3. Although the first 60000 terms of the colossally abundant numbers and the superior highly composite numbers are Harshad numbers, I am not aware of a proof that all terms are Harshad numbers. There may be large counterexamples. [From T. D. Noe (noe(AT)sspectra.com), Oct 27 2009]

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.

LINKS

Wikepedia, Highly Abundant Numbers.

Wikepedia, Harshad Number.

FORMULA

The highly abundant numbers (A002093) are those values of n for which sigma(n)>sigma(m) for all m<n, where sigma(n)= A000203(n). Harshad numbers (A005349) are divisible by the sum of their digits.

EXAMPLE

The third highly abundant number that is not a Harshad number is 168. Hence a(3)=168

MATHEMATICA

hadata1=FoldList[Max, 1, Table[DivisorSigma[1, n], {n, 2, 10^6}]]; data1=Flatten[Position[hadata1, #, 1, 1]&/@Union[hadata1]]; HarshadQ[k_]:=If[IntegerQ[ k/(Plus @@ IntegerDigits[ k ])], True, False]; Select[data1, !HarshadQ[ # ] &]

CROSSREFS

Cf. A002093, A005349, A000203, A004394, A004490, A002182, A002201, A128699, A128700, A128701.

Sequence in context: A108676 A159245 A066487 this_sequence A143060 A006637 A014344

Adjacent sequences: A128699 A128700 A128701 this_sequence A128703 A128704 A128705

KEYWORD

nonn

AUTHOR

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

EXTENSIONS

a(16)-a(29) from Donovan Johnson (donovan.johnson(AT)yahoo.com), May 09 2009

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 December 15 00:47 EST 2009. Contains 170825 sequences.


AT&T Labs Research