R使用名称列表删除数据框中的列

Question

我正在寻找一种基于名称列表删除数据框中列的方法。

我尝试了几件事（比如subset(df,listofcolumn)），但每次都有错误。我的最后一次尝试是尝试循环，但我仍然有一个错误：

  

“-c（name）中的错误：一元运算符的参数无效”

discretizedh<-function(h,df){
discret<-discretized(h,df)
coltodrop=NULL
i=1
for(column in discret){
  k=0
  for(data in column){
    k=k+data
}
if(k==0){
    coltodrop=c(coltodrop,colnames(discret[i]))
}
i=i+1
}

for(name in coltodrop){
discret=subset(discret,-c(name))
}
return(discret)