请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
你的代码改动一点就可以
temp1 = list.files(pattern="*.Rdata") temp2 <- substr(temp1, 1, nchar(temp1)-6) temp3 <- list() for ( k in 1:5) { load(temp1[k]) dat = eval(parse(text = temp2[k])) dat[2,1] <- dat[1,1] temp3[[temp2[k]]] <- dat } temp3
蔡曦1990 发表于 2020-12-16 22:25 我贴一个错误的代码,这是我写的,可是执行会报错,这样不行