R数据框删除列使用grep - 列不会被删除

Question

我有以下循环：

columns.to.remove <- c('C_', 'WWTest_', 'TotalClick', 'IPA_', 'Sell', 'G_')
for (i in length(columns.to.remove)) {

  final.frame <- final.frame[, -grep(columns.to.remove[i], colnames(final.frame))]
}

但是当我通过尝试final.frame$G_查看数据框时，它仍然显示为全部。

Answer 1

for (i in columns.to.remove) {
    final.frame <- final.frame[!grepl(i, colnames(final.frame))]
}

编辑：没有循环执行此操作

columns.to.remove.combined <- paste(columns.to.remove, collapse = '|')
final.frame <- final.frame[!grepl(columns.to.remove.combined, colnames(final.frame))]