install.packages("venn") library(venn) mi <- read.csv("mi.csv") venn(list(which(mi$HadMeasles=="Yes"), which(mi$HadRubella=="Yes")))