let () = Scanf.scanf "%d" @@ fun n ->
  let l_ary = Array.init n @@ fun _ -> Scanf.scanf " %d" Fun.id in
  Printf.printf "%s\n" @@
  if 2 * (Array.fold_left max min_int l_ary) < Array.fold_left ( + ) 0 l_ary then "Yes" else "No"