#!/usr/bin/ruby

def solve(_, ls)
  max = -1
  sum = 0
  ls.each do |l|
    sum += l
    if l > max
      max = l
    end
  end
  sum -= max
  if max < sum
    "Yes"
  else
    "No"
  end
end

def each_case(sin)
  while ln = sin.gets
    n = ln.chomp.to_i
    ls = sin.gets.chomp.split(" ").map(&:to_i)
    yield n, ls
  end
end

each_case(STDIN) do |n, ls|
  puts solve(n, ls)
end


