Search: id:A131647 Results 1-1 of 1 results found. %I A131647 %S A131647 30,70,105,231,286,627,646,805,897,1122,1581,1798,2730,2958,2967,3055, %T A131647 3526,3570,4070,4543,5487,5658,6461,6745,7198,7881,8778,8970,9222,9282, %U A131647 9717,10366,10370,10626,10707,11130,14231,15015,16377,16530,19866 %N A131647 Numbers that are products of distinct primes and divisible by the sum of those primes. %e A131647 1122 = 2*3*11*17 and 1122 is divisible by 2+3+11+17=33. %t A131647 Select[Range[2, 20000], PrimeQ[ # ] == False && Union[Transpose[FactorInteger[ # ]][[2]]] == {1} && Mod[ #, Plus @@ Transpose[FactorInteger[ # ]][[1]]] == 0 &] %Y A131647 Sequence in context: A064623 A112343 A164596 this_sequence A071141 A071312 A071142 %Y A131647 Adjacent sequences: A131644 A131645 A131646 this_sequence A131648 A131649 A131650 %K A131647 nonn %O A131647 1,1 %A A131647 Tanya Khovanova (tanyakh(AT)yahoo.com), Sep 08 2007 Search completed in 0.001 seconds