gsub在R中套用组合

use*_*123 5 r

我试图在数据帧的每一列上使用gsub来删除一些字符,我尝试使用apply来完成此操作,但未成功:

data<-apply(data,2, function(x) gsub("£","",data[x]))
Run Code Online (Sandbox Code Playgroud)

返回错误

Error in `[.data.frame`(data, x) : undefined columns selected
Run Code Online (Sandbox Code Playgroud)

我知道如果我做得到

for(i in 1: length(data)){data[,i]<-gsub("£","",data[,i]) }
Run Code Online (Sandbox Code Playgroud)

但是为什么申请电话不起作用?

Mat*_*ert 5

这是下一个最佳的可复制示例。尽管如果我再努力一点的话,可能会有更好/更快的(矢量化)方式。但由于您要求申请:

# just turn it to characters in order to 
# turn . to , ... was just the first dataset that came to
# but as character should not be necessary for your data
ds[] <- sapply(mtcars,function(x) gsub("\\.",",",as.character(x)))
Run Code Online (Sandbox Code Playgroud)