PROGRAM ATCODER

implicit none
integer :: n, i
integer,allocatable :: l(:)

read(*,*) n
allocate(l(n))

read(*,*) (l(i),i=1,n)

if ( maxval(l) < sum(l)-maxval(l) ) then
	write(*,'(a)') 'Yes'
else
	write(*,'(a)') 'No'
end if

END PROGRAM ATCODER