Rで解析：2D、3Dのベン図を作成「vennplot」パッケージ

#パッケージのインストール
install.packages("vennplot")

#パッケージの読み込み
library("vennplot")

###データ例の作成#####
set.seed(1234)
n <- 10
TestData <- data.frame("Data1" = sample(0:1, n, replace = TRUE),
                       "Data2" = sample(0:1, n, replace = TRUE),
                       "Data3" = sample(0:1, n, replace = TRUE),
                       "Data4" = sample(0:1, n, replace = TRUE),
                       "Data5" = rep(0, n))
#Data5を独立にするためデータを調整
TestData[5,] <- c(rep(0, 4), 1)
#データの確認
TestData
   Data1 Data2 Data3 Data4 Data5
1      1     1     1     0     0
2      1     1     1     1     0
3      1     1     1     0     0
4      1     0     1     0     0
5      0     0     0     0     1
6      1     1     1     1     0
7      0     1     0     0     0
8      0     0     1     1     0
9      0     1     1     1     0
10     1     1     1     0     0
########

#2Dまたは3Dのベン図を作成:vennplotコマンド
#データを指定:combinationsオプション
#2Dまたは3Dの指定:ThreeDオプション;TRUE,2D
vennplot(disjoint.combinations = TestData,
         ThreeD = FALSE, 
         #cols = c("red", "blue", "green", "grey", "yellow"),
         alpha = 0.1)