cci(nhanes) # indicator for 13 complete cases 
  ici(nhanes) # indicator for 12 rows with incomplete cases 
  f <- cci(nhanes[,c("bmi","hyp")]) # complete data for bmi and hyp
  nhanes[f,] # obtain all data from those with complete bmi and hypRun the code above in your browser using DataLab