Drop all variables with NA-values
drop_var_with_na(data)
data
Data frame
data <- data.frame(a = 1:10, b = rep(NA,10)) drop_var_with_na(data)