program abc117b
  implicit none
  integer n
  integer,allocatable :: l(:)
  read *, n
  allocate(l(n))
  read *, l
  if (sum(l)-maxval(l)*2 > 0) then
     print *, 'Yes'
  else
     print *, 'No'
  end if
end program abc117b
