implicit none
integer n,counts,i
character(100) s

read(5,*)n
read(5,*)s 

do i=1,n
if(s(i:i)=="R") then
counts=counts+1;
endif
enddo

if(counts .gt.(n-counts)) then
write(6,*) "Yes"
else 
write(6,*) "No"
endif

end