来自list的read.csv获取唯一的colnames

Question

我正在将我的文件读入file_list。使用read.csv读取数据，但是，我希望datalist中的数据具有作为file_list文件名的共同名。原始文件没有标题。 如何更改function(x)以使第二列具有与文件名类似的colname。第一列不必是唯一的。

file_list = list.files(pattern="*.csv")     

datalist = lapply(file_list, function(x){read.csv(file=x,header=F,sep = "\t")})

Answer 1

  

如何更改函数（x）以使第二列的colname类似于文件名？

datalist = lapply(file_list, function(x){
    dat = read.csv(file=x, header=F, sep = "\t")
    names(dat)[2] = x
    return(dat)
})

这会将文件名作为第二列的名称。如果您要修改名称，请使用gsub上的substr或x（或类似名称）修改字符串。

Answer 2

您可以添加另一个步骤。

names(datalist) <- file_list