usuwanie listy kolumn z danych.frame przy użyciu podzbioru

Question

Często trzeba usunąć listy kolumn z data.frame.

I zazwyczaj to zrobić:

to.remove <- c("hp","drat","wt","qsec") 
mtcars[,-which(names(mtcars) %in% to.remove)] 

który działa dobrze.

Ale chciałbym móc to zrobić w czystszy sposób przy użyciu subset. Ale wydaje się, że dołącza dane.frame, a następnie uzyskuje dostęp do nazw kolumn jako zmiennych zamiast łańcuchów.

Na przykład to, co chciałbym być w stanie to zrobić:

subset(mtcars,select=-to.remove) 

Czy istnieje sposób zmusić subset do korzystania z ciągów wektorów w rachunku select? Czy jest jeszcze inna lepsza alternatywa?

Answer 1

to pewnie zrobić to tak:

to.remove <- c("hp","drat","wt","qsec") 
`%ni%` <- Negate(`%in%`) 
subset(mtcars,select = names(mtcars) %ni% to.remove) 

(używam %ni% dużo, więc mam to wbudowane w moim .Rprofile już.)

Answer 2

Można oczywiście użyć select, ale Musimy przekazywać imiona, a nie znaki. Więc to będzie działać:

subset(mtcars, select = -c(hp, drat, wt, qsec))