从文本文件的文件名和内容创建数据框

Question

我有一个目录，其中包含以id命名的txt文件。每个id txt文件都包含一个数字。

我希望R制作一个id列，并将每一行作为文件名。然后在每个这些txt文件中添加另一列作为数值。

例如，假设我有“ file1.txt” |数值之类的东西

在此示例中，file1.txt包含数字31。

我知道我应该使用list.files（），但是我无法使用它。

以下，我未能使别人编写的脚本适应类似的情况。我正在从包含文本文件作为工作目录的目录中运行脚本。

#create test files
file1 <- 31
write.table(file1, file = "file1.txt", sep = "")
file2 <- 6
write.table(file2, file = "file2.txt", sep = "")

   x <- NA
   y <- NA
   z <- NA

for(i in 1:length(list.files())){
  x[i] <- fileNames[[1]][i]
  y[i] <- read.table(x[i],sep="")
  z[i] <- str_sub(x[i],,-5)
}
dat <- as.data.frame(cbind(x,z,unlist(y)))
colnames(dat) <- c("file","cond","clicks")

谢谢您的帮助。