測量集重疊向量的維恩圖

要計算兩個集合中有多少個元素重疊，可以編寫一個自定義函式：

xtab_set <- function(A, B){
    both    <-  union(A, B)
    inA     <-  both %in% A
    inB     <-  both %in% B
    return(table(inA, inB))
}

A = 1:20
B = 10:30

xtab_set(A, B)

#        inB
# inA     FALSE TRUE
#   FALSE     0   10
#   TRUE      9   11

由各種包提供的維恩圖可用於視覺化多個集合的重疊計數。