Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/70.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在R中重命名多个数据集_R_Dataframe_Rstudio_Rename - Fatal编程技术网

在R中重命名多个数据集

在R中重命名多个数据集,r,dataframe,rstudio,rename,R,Dataframe,Rstudio,Rename,我在R中加载了将近400个数据帧,但名称的扩展名仍然是.csv 我用这个代码读取数据 Files <- list.files(pattern="\\.csv$") for (i in 1:length(Files)){ assign(Files[i], read.csv(Files[i], sep = ";", header = T)) } 文件尝试以下操作: Files <- l

我在R中加载了将近400个数据帧,但名称的扩展名仍然是.csv

我用这个代码读取数据

Files <- list.files(pattern="\\.csv$")

for (i in 1:length(Files)){
  assign(Files[i], 
         read.csv(Files[i], 
                  sep = ";", 
                  header = T))
}
文件尝试以下操作:

Files <- list.files(pattern="\\.csv$")
for (i in 1:length(Files)){
  assign(gsub("\\..*","",Files)[i], # replace your this line of code
         read.csv(Files[i], 
                  sep = ";", 
                  header = T))
}
文件尝试以下操作:

Files <- list.files(pattern="\\.csv$")
for (i in 1:length(Files)){
  assign(gsub("\\..*","",Files)[i], # replace your this line of code
         read.csv(Files[i], 
                  sep = ";", 
                  header = T))
}

文件您可能需要添加额外的
gsub
步骤:

Files <- list.files(pattern="\\.csv$")
File.name <- gsub("\\.csv$", "", Files)
for (i in 1:length(Files)){
  assign(File.name[i], 
         read.csv(Files[i], 
                  sep = ";", 
                  header = T))
}

文件您可能需要添加额外的
gsub
步骤:

Files <- list.files(pattern="\\.csv$")
File.name <- gsub("\\.csv$", "", Files)
for (i in 1:length(Files)){
  assign(File.name[i], 
         read.csv(Files[i], 
                  sep = ";", 
                  header = T))
}

文件这里有一种方法不使用
赋值
,这可能是更好的做法。可以将文件名保留为列表的元素名

library(tidyverse)
files <- list.files(pattern="\\.csv$")

df_list <- map(files, read_csv2)
names(df_list) <- str_remove(files, "\\.csv$")
库(tidyverse)

文件这里有一种不使用
assign
的方法,这可能是更好的做法。可以将文件名保留为列表的元素名

library(tidyverse)
files <- list.files(pattern="\\.csv$")

df_list <- map(files, read_csv2)
names(df_list) <- str_remove(files, "\\.csv$")
库(tidyverse)

文件不是答案,但请不要这样做。将数据帧存储在列表中,而不是作为全局命名空间中的400个独立对象。如果以后需要,您可以使用字符串操作删除名称,但不要执行此处的操作。没有答案,但请不要执行此操作。将数据帧存储在列表中,而不是作为全局命名空间中的400个独立对象。如果以后需要,可以使用字符串操作删除名称,但不要执行此处的操作。