я большой набор данных, и я хотел бы прочитать определенные столбцы или отбросить все остальные.

data <- read.dta("file.dta")

Я выбираю столбцы, которые мне не интересны:

var.out <- names(data)[!names(data) %in% c("iden", "name", "x_serv", "m_serv")]

и чем я хотел бы сделать что-то вроде:

for(i in 1:length(var.out)) {
   paste("data$", var.out[i], sep="") <- NULL
}

отбросить все ненужные столбцы. Это оптимальное решение?