如何合并目录中的多个文件

14 浏览
0 Comments

如何合并目录中的多个文件

我在电脑上有一个目录，其中保存了所有我的*.log文件。目标是编写代码，我可以指定想要查看合并数据的日期。一天的数据被分为10个文件。

我尝试了以下方法：

setwd("D:/Assembly lags/SK190400 ghp tracer/")
file_list<-list.files(pattern="LOG_SK190400_2018.03.13_*")

结果是：

[1] "LOG_SK190400_2018.03.13_03-40-56-704.log" "LOG_SK190400_2018.03.13_06-36-35-019.log" "LOG_SK190400_2018.03.13_09-17-35-899.log"
[4] "LOG_SK190400_2018.03.13_12-33-43-891.log" "LOG_SK190400_2018.03.13_15-31-09-628.log" "LOG_SK190400_2018.03.13_18-38-33-424.log"
[7] "LOG_SK190400_2018.03.13_22-11-44-855.log"

文件中的数据如下：

     Time         Type  Station            Log_time
1   08:40:01.7462 UNIT_RESULT SK190400      272
2   08:40:11.6187 UNIT_CHECKI SK190400      257
3   08:40:18.1471 UNIT_RESULT SK190400      306
4   08:40:27.9737 UNIT_CHECKI SK190400      224

所有文件具有相同的设计。我尝试了一些函数，如：

lapply

rbind

list

但是没有返回任何有用的结果。

0

1 答案

0 Comments

尝试使用data.table中的fread函数来解决这个问题。首先，使用library函数加载data.table包。然后，使用setwd函数设置工作目录为"D:/Assembly lags/SK190400 ghp tracer/"。接下来，使用list.files函数和正则表达式"LOG_SK190400_2018.03.13_*"获取以"LOG_SK190400_2018.03.13_"开头的文件列表。最后，使用lapply函数和fread函数将文件列表中的每个文件读取到log_2018.03.13中。可以使用循环或另一个lapply函数来处理其他日期的文件。

0