l = gets.split[1].to_i
d = gets.split.map(&:to_i).sort.reverse
p (1..l).map{|c| d[0..(c-1)].sum}.max