program max
implicit none
integer N
integer L(200)
integer mx
integer i,j,x
 
 
read *, N
do i = 1,N
 read *, L(i)
end do
 
 mx=L(1)
do i =1,N
if(mx < L(i+1))then
 mx=L(i+1)
else if(mx > L(i+1))then
 mx=mx
endif
end do
 
do i=1,N
if(mx==L(i)) cycle
x=L(i)+x
end do
 
 
if(mx<x)then
print *, 'Yes'
else 
print *, 'No'
end if
 
end program max