如何在R中读取多个文件后使用循环函数重命名它们的名称？

Question

我在"原始数据"；，在读取它们并将它们分配为单独的数据集之后，我还想将它们从"；数据集1.a.csv"；至"；数据集1"；。

我编写了实现第一个目标的代码，使用第一个循环将所有文件读取为列表，然后使用第二个循环取消设置列表：ldf。但我不知道应该在哪里添加代码，让R一次更改所有文件的名称？我尝试添加str_replace_all(名称(ldf(&"&quot-&quot；(在不同的地方，但都返回了错误的输出，并不能解决摆脱"的问题；。csv"；。非常感谢~~

这是我的代码：

datanames<-list.files(here("rawdata"))
ldf<-list()
for (i in (datanames)){
ldf[[i]]<-import(here("rawdata",i))
for (j in names(ldf)){
assign(j,ldf[[j]], .GlobalEnv)
}
}

Answer 1

我不确定要替换的名称的模式，但如果它是blank-number-blank-letter.csv，请使用gsub删除。然后，您似乎想将索引添加到名称中，因此用索引i粘贴0。

我不确定你将如何导入，但可以使用read.csv

Assign将指定名称。

lapply(1:length(list.files()), function(i) assign(paste0(gsub(" [0-9] [a-z].csv", "", list.files()[i]),i), read.csv(list.files()[i])))