这些功能单独工作，但在引入循环时则不然。
for (i in ls()) {
names(i) <- gsub(" ","_",names(i))
names(i) <- gsub("\\(","_",names(i))
names(i) <- gsub("\\)","_",names(i))
names(i) <- gsub(" ","_",names(i))
names(i) <- gsub("-","_",names(i))
names(i) <- gsub("/","_",names(i))
}
有关如何解决此问题的任何想法？