fun main(args: Array<String>) {
    val nk = nextIntList()
    val n = nk[0]
    val k = nk[1]

    val an = nextLongList()

    fun fCalc (n:Int):Long{
        var res = 0L
        for(i in n-k+1..n){
            res += an[i]
        }
        return res
    }
    fun nCalc(before :Long, n:Int):Long{
         return before - an[n-k] + an[n]
    }
    fun check(a:Long,b:Long){
        if(a > b) println("Yes") else println("No")
    }

    var b = -1L
    var a = -1L

    // 1~k-1 x
    for(i in k-1 until an.size){
        if(b < 0L){
            b = fCalc(i)
            continue
        }
        a = nCalc(b,i)
        check(a, b)
        b = a
    }

}
fun next() = readLine()!!
fun nextIntList() = next().split(" ").map{ it.toInt() }
fun nextLongList() = next().split(" ").map{ it.toLong() }