n, m = gets.chomp.split.map(&:to_i)
ds = gets.chomp.split.map { |d| d.to_i - 1 }
dict = [nil] * 200_000
ds.each_with_index do |d, i|
  dict[d] = i
end
n.times do |i|
  next if dict[i] == i
  j = dict[i]
  k = ds[i]
  ds[i] = i
  ds[j] = k
  dict[k] = j
  dict[i] = i
  m -= 1
end
puts m >= 0 && m.even? ? :YES : :NO