R从一系列.out文件中提取数字

Question

我有35个文件是从另一个程序输出的错误。我可以将它们读入R但我不确定如何从所有文件中提取单个值。

source

此代码为我提供了每个文件的最后一行，但仍然有文本，我只想将数字添加到我可以绘制的列表中。

一个输出文件的图像，它们都是相同的：

Answer 1

一种解决方案是在stringr包中使用str_match函数。

ldf<-list()
ldf[[1]]<-"Program exectution time: 6.19793 seconds"
ldf[[2]]<-"Program exectution time: 9.19793 seconds"

library(stringr)
output<-str_match(ldf, "[.0-9]*[.0-9]")

Answer 2

您可以使用strsplit命令并在空白位置拆分（与paste命令反向工作）。

x <- c("Program execution time: 6.19793 seconds")
strsplit(x, split = " ")

您可以将其与as.numeric结合使用，将字符串转换为数字。