Если вы хотите удалить столбцы по ссылке и избежать внутреннего копирования, связанного с data.frames
, вы можете использовать пакет data.table
и функцию :=
Вы можете передать имена векторов символов в левую часть оператора :=
и NULL
в качестве RHS.
library(data.table)
df <- data.frame(a=1:10, b=1:10, c=1:10, d=1:10)
DT <- data.table(df)
# or more simply DT <- data.table(a=1:10, b=1:10, c=1:10, d=1:10) #
DT[, c('a','b') := NULL]
Если вы хотите предопределить имена как вектор символов вне вызова [
, оберните имя объекта в ()
или {}
, чтобы заставить LHS оцениваться в области вызова, а не как имя в области DT
.
del <- c('a','b')
DT <- data.table(a=1:10, b=1:10, c=1:10, d=1:10)
DT[, (del) := NULL]
DT <- <- data.table(a=1:10, b=1:10, c=1:10, d=1:10)
DT[, {del} := NULL]
# force or `c` would also work.
Вы также можете использовать set
, что позволяет избежать накладных расходов, связанных с [.data.table
, , а также работает для data.frames
!
df <- data.frame(a=1:10, b=1:10, c=1:10, d=1:10)
DT <- data.table(df)
# drop `a` from df (no copying involved)
set(df, j = 'a', value = NULL)
# drop `b` from DT (no copying involved)
set(DT, j = 'b', value = NULL)
14.11.2012
DF[,keeps]
вместоDF[keeps]
? 28.10.2014DF[!(names(DF) %in% drops)]
? Судя по тому, что было сказано в этих комментариях, это должно быть эквивалентно использованиюdrop=FALSE
, что, вероятно, в любом случае мы хотим. 20.03.2021