# Create data frame
a <- c(1, 2, 3, 4, NA)
b <- c( 1, NA, 3, 4, 5)
ABData <- data.frame(a, b)
# Remove missing values from column a
ASubData <- DropNA(ABData, Var = "a")
# Remove missing values in columns a and b
ABSubData <- DropNA(ABData, Var = c("a", "b"))Run the code above in your browser using DataLab