Venn diagram

install.packages("venn") library(venn)

mi <- read.csv("mi.csv")

venn(list(which(miHadMeasles=="Yes"), which(miHadRubella=="Yes")))