从 data.frame 的列中的字符串中检索数字

Retrieve numbers from a string in the columns of a data.frame

我有来自特定文件格式的这 4 列:

=1  =1  =1  =1
4G  4B  4d  2g
4E  8cL 4e  .
.   8BJ .   .
4F# 4A  4d  4dd
=2  =2  =2  =2
4G  4G  2d  4.b
4D  4F# .   .
.   .   .   8a
4E  4G  4B  4g

我想把它转换成下面的样子data.frame:

    1   1   1   1
    4   4   4   2
    4   8   4   .
    .   8   .   .
    4   4   4   4
    2   2   2   2
    4   4   2   4
    4   4   .   .
    .   .   .   8
    4   4   4   4

我想有一个图书馆可以做这类事情。我已经尝试为此创建一个函数,但无法正常工作。任何贡献都会得到回报。

我们可以使用 readr 包中的 parse_number

library(readr)
library(dplyr)

df %>%
  mutate_all(parse_number)


#   V1 V2 V3 V4
#1   1  1  1  1
#2   4  4  4  2
#3   4  8  4 NA
#4  NA  8 NA NA
#5   4  4  4  4
#6   2  2  2  2
#7   4  4  2  4
#8   4  4 NA NA
#9  NA NA NA  8
#10  4  4  4  4

我们也可以使用lapply将函数应用到所有列

df[] <- lapply(df, parse_number)