在R中的for循环中替换字符串[重复]

Question

我有很多文本文件

fr.txt
no.txt
sta.txt
sto.txt

我创建了一个文件名作为字符串的向量

string <- c("fr","no","sta","sto")

我想在 R 中使用 for 循环来使用字符串作为变量名并读取相应的文件。

for (type in c("fr","no","sta","sto")){type <- read.table(sprintf("%s.txt", type),header=TRUE)}

例如

fr <- read.table("fr.txt",header=TRUE)
no <- read.table("no.txt",header=TRUE)
sta <- read.table("sta.txt",header=TRUE)

我应该如何开始？上面的 for 循环没有做我想做的事。

Answer 1

如果您想读取目录中的所有“.txt”文件，只需使用：

temp = list.files(pattern="*.txt")
myfiles = lapply(temp, read.table)

解释
list.files() - 抓取您工作目录中的文件。假设您将文件（“one.txt”、“two.txt”等）保存在“C://example”中，那么您必须首先设置您的工作目录，例如

setwd("C://example")

以便 list.files() 知道在哪里搜索您的文件。如果需要，您还可以使用以下方法列出 .csv 文件：

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

接下来，您可以使用以下方法为工作目录中的每个“.txt”文件应用 read.table 函数：

lapply(temp, read.table)

Answer 2

试试这个：

for (type in c("fr","no","sta","sto")){
      as.name(type) <- read.table(paste0(type,".txt"), header=TRUE)
}