我想读取一系列csv文件中的一系列文件，然后根据创建的文件进行单独的标记。所以目前我可以读取所有文件：
temp = list.files(pattern="*.csv")
myfiles = lapply(temp, read_csv)
其中创建了六个tbl的列表。我考虑过这样做：
temp_list <- as.list(gsub("[[\\.csv]","",(temp)))
这将给出已读取的csv文件名的列表，其中csv从末尾删除。我曾考虑过尝试此操作，但肯定无法正常工作
names(myfiles) <- names(temp_list)
我可以单独命名它们，但宁愿具有清理器/单一功能，也可以生成结果。
filea <- myfiles[[1]]
fileb <- myfiles[[2]]
filec <- myfiles[[3]]
filed <- myfiles[[4]]
filee <- myfiles[[5]]
filef <- myfiles[[6]]
谢谢！