r - 使用 fread 找不到文件

Question

我有一些基本代码，用于从共享相同文件格式的文件夹中读取多个文件。每个文本文件本身都包含一两个句子；没有列、标题或类似的东西。

我最初使用 read.table 来执行此操作，但在进行了一些阅读之后，特别是查看了 this recent post我想看看我是否可以使用 fread 来让事情变得更快一些。

library(data.table)

files <- list.files(path = "C:/Documents", pattern = "*.txt")

readdata <- function(x)
{
    mydata <- fread(x, sep=" ")
    return(mydata)
}

all.files <- lapply(files, readdata)
final.data <- rbindlist(all.files)

当我运行这段代码时，出现以下错误:

Error in fread(x, sep = " ") : File not found: 1.txt

1.txt 是文件夹中的第一个文件。谁能弄清楚这是为什么？路径文件夹是正确的(我将上面的文件夹更改为通用的东西放在这里)所以我似乎看不出问题是什么。

Answer 1

您必须指定文件的路径:

path <- "C:/Documents"

readdata <- function(x)
{
  f <- file.path(path, x)
  mydata <- fread(f, sep=" ")
  return(mydata)
}

---

另一种选择是使用带有参数 full.names = TRUE 的 list.files。这将返回文件名及其路径。

files <- list.files(path = "C:/Documents", pattern = "*.txt", full.names = TRUE)

readdata <- function(x)
{
    mydata <- fread(x, sep=" ")
    return(mydata)
}