使用 for 循环从文本文件中提取数据

洛伦娜·范·蒙尼科姆

我有 40 个带有名称的文本文件：

[1] "2006-03-31.txt" "2006-06-30.txt" "2006-09-30.txt" "2006-12-31.txt" "2007-03-31.txt"
[6] "2007-06-30.txt" "2007-09-30.txt" "2007-12-31.txt" "2008-03-31.txt" etc...

我需要提取一个特定的数据，我知道如何单独执行，但这需要一段时间：

m_value1 <- `2006-03-31.txt`$Marknadsvarde_tot[1]
m_value2 <- `2006-06-30.txt`$Marknadsvarde_tot[1]
m_value3 <- `2006-09-30.txt`$Marknadsvarde_tot[1]
m_value4 <- `2006-12-31.txt`$Marknadsvarde_tot[1]

有人可以帮助我使用 for 循环从特定的列和行中提取所有不同的文本文件中的数据吗？

比亚

假设您的文件都在同一个文件夹中，您可以使用list.files获取所有文件的名称，然后遍历它们并获取您需要的值。所以像这样的事情？

m_value<-character() #or whatever the type of your variable is
filelist<-list.files(path="...", all.files = TRUE)
for (i in 1:length(filelist)){
   df<-read.table(myfile[i], h=T)
   m_value[i]<-df$Marknadsvarde_tot[1]
}

编辑：

如果您已经导入了所有可以使用的数据get：

txt_files <- list.files(pattern = "*.txt") 
for(i in txt_files) { x <- read.delim(i, header=TRUE) assign(i,x) }

m_value<-character()
for(i in 1:length(txt_files)) {
  m_value[i] <- get(txt_files[i])$Marknadsvarde_tot[1]
}

本文收集自互联网，转载请注明来源。

如有侵权，请联系 [email protected] 删除。