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!)
A098835 Smith abundant numbers. 1
378, 438, 576, 588, 636, 648, 654, 666, 690, 728, 762, 852, 1086, 1284, 1376, 1626, 1736, 1776, 1842, 1872, 1908, 1952, 1962, 2286, 2484, 2556, 2576, 2688, 2934, 2944, 2958, 2964, 2970, 3138, 3168, 3174, 3246, 3258, 3294, 3366, 3390, 3564, 3690, 3852 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
EXAMPLE
a(1) = 378 because 378 is a Smith number as well as an abundant number.
MATHEMATICA
digSum[n_] := Plus @@ IntegerDigits[n]; abSmithQ[n_] := DivisorSigma[1, n] > 2*n && Plus @@ (Last@# * digSum[First@#] & /@ FactorInteger[n]) == digSum[n]; Select[Range[4000], abSmithQ] (* Amiram Eldar, Aug 23 2020 *)
CROSSREFS
Intersection of A005101 and A006753.
Sequence in context: A350183 A045197 A349539 * A134602 A268373 A030029
KEYWORD
base,nonn
AUTHOR
Shyam Sunder Gupta, Oct 10 2004
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 February 21 04:30 EST 2024. Contains 370219 sequences. (Running on oeis4.)