I like data table\'s way of deleting columns:
library(data.table) data <- mtcars setDT(data) data[, 1:3 := NULL]
Deleting columns by posit