在我的dataframe中,我只选择变量test3-test8。
data[,grep('(test[3-8]+$)',names(data)),]
现在,我想用"1"
替换"2"
。根据df[ df == "1" ] = "2"
的说法,我尝试过:
data[,grep('(test[3-8]+$)',names(data)),][ data[,grep('(test[3-8]+$)',names(data)),] == "1" ] = "2"
那不管用。
[<-.data.frame
中的错误(*tmp*
,,grep("(^dv_beh_0-9+r)",名称(数据)),:未使用的参数(S) ()
我犯了什么错?
发布于 2011-03-29 03:04:35
去掉多余的逗号(它们为数据框架指定选项,但没有列出选项),错误就消失了:
dtf <- data.frame(test1=runif(10))
dtf <- cbind(dtf,dtf)
dtf <- cbind(dtf,dtf)
dtf[3,3] <- 1
names(dtf) <- paste("test",seq(ncol(dtf)),sep="")
names.sel <- grep('(test[3-8]+$)',names(dtf))
dtf[,names.sel][ dtf[,names.sel] == 1 ] <- 2
stopifnot(dtf[3,3]==2)
为了证明这就是问题所在,我可以用以下方法重现错误:
data[,names.sel,][ data[,names.sel] == 1 ,] <- 2
Error in `[<-.data.frame`(`*tmp*`, , grep("(test[3-8]+$)", names(data)), :
unused argument(s) ()
https://stackoverflow.com/questions/5467117
复制相似问题