program main
  implicit none
  integer::n
  !integer,allocatable::
  character(200)::s

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

  if(mod(n,2)==0.and.s(1:n/2)==s(n/2+1:2*n)) then
    write(*,*) 'Yes'
  else
    write(*,*) 'No'
  end if
  stop
end program
