OFFSET
1,1
COMMENTS
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
30 is a member. The prime divisors of 30 are 2,3 and 5 and 2+3+5 = 10, divides 30.
84, however, is not a member because the sum of its distinct prime divisors (2+3+7=12) does not divide the product of its distinct prime divisors (2*3*7=42), even though 12 does divide 84. [From Harvey P. Dale, Nov 26 2011, based on a comment from Ray Chandler]
MATHEMATICA
sdpQ[n_]:=Module[{dpds=Transpose[FactorInteger[n]][[1]]}, Divisible[ Times@@dpds, Total[dpds]]]; Select[Range[2, 200], sdpQ] (* Harvey P. Dale, Nov 26 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Jul 28 2003
EXTENSIONS
More terms from Victoria A Sapko (vsapko(AT)canes.gsw.edu), Sep 23 2003
Edited by Franz Vrabec, Sep 03 2005
STATUS
approved