let inp = readLine()!.split(separator: " ").map { Int($0)! }
 
let n = inp[0]
let k = inp[1]
 
let a = readLine()!.split(separator: " ").map { Int($0)! }
 
var cur = 1
 
for i in 0..<k {
  cur *= a[i]
}
 
var eval: [Int] = .init(repeating: 0, count: n - k + 1)
eval[0] = cur
 
for i in k...n {
  cur /= a[i-k]
  cur *= a[i]
  eval[i - k + 1] = cur
  print(a[i-1] > a[i - 1 - k] ? "Yes" : "No")
}