df <- df[, !(names(df) %in% c("col1", "col2")), drop = FALSE]