Kiểm tra phần tử

x %in% set kiểm tra từng phần tử của x và trả về một giá trị logic cho mỗi phần tử. all() kiểm tra xem mọi phép kiểm tra đều là TRUE hay không, còn any() kiểm tra xem có ít nhất một phép kiểm tra đúng hay không.

required <- c("flour", "eggs", "milk")
pantry <- c("eggs", "salt", "flour")
print(required %in% pantry)
print(all(required %in% pantry))
print(any(required %in% pantry))

Đầu ra:

[1]  TRUE  TRUE FALSE
[1] FALSE
[1] TRUE

Lập chỉ số với phép kiểm tra phủ định để liệt kê những thứ còn thiếu, theo thứ tự của vectơ đầu tiên:

required <- c("flour", "eggs", "milk", "sugar")
pantry <- c("eggs", "flour")
missing <- required[!(required %in% pantry)]
print(missing)

Đầu ra:

[1] "milk"  "sugar"

setequal(a, b) kiểm tra xem hai vector có chứa cùng các giá trị hay không, không xét thứ tự và các giá trị lặp lại:

print(setequal(c("a", "b"), c("b", "a", "a")))
print(setequal(c("a", "b"), c("a", "c")))

Đầu ra:

[1] TRUE
[1] FALSE

Với một vector rỗng, all() là TRUE và any() là FALSE: khi không có gì cần đáp ứng thì cũng không có gì bị thiếu.

which() chuyển một véc-tơ logic thành vị trí của các giá trị TRUE, cho bạn biết các kết quả khớp nằm ở đâu:

required <- c("flour", "eggs", "milk")
pantry <- c("eggs")
print(which(!(required %in% pantry)))

Đầu ra:

[1] 1 3