Technically, this is a logical vector, as is the one in line 57, because the first argument to `vector()` is `mode = "logical"`

    R> x <- vector()
    R> is.logical(x)
    [1] TRUE