path: root/problem23.ijs

divisors =. [:I.0=i.|]
abundant =. +/&divisors>]
limit =. 28123
abundantNums =. I. abundant"0 i.limit
sums =. ~.,+/~abundantNums
problem23 =: +/I.-.(i.limit)e."0 _ sums