r - 从 R 中的给定字符串中提取日期

Question

这是我的字符串

"7MA_S_VE_MS_FB_MEASURE_P1_2013-08-21_17-42-19.BMP"

我正在尝试以这种方式提取日期:

library(stringr)
as.Date(str_extract(test,"[0-9]{4}/[0-9]{2}/[0-9]{2}"),"%Y-%m-%d")

我为此得到了NA。

期望的输出是

2013-08-21

有人能指出我正确的方向吗？

Answer 1

您已将破折号 - 替换为正则表达式中的斜杠 /。

as.Date(str_extract(string, "[0-9]{4}-[0-9]{2}-[0-9]{2}"), format="%Y-%m-%d")
# [1] "2013-08-21"

但是你也可以用\d替换[0-9]位，它们代表同样的东西。我不确定为什么，但正则表达式专家似乎总是使用 \d 版本(请注意，您必须使用另一个反斜杠来转义反斜杠):

as.Date(str_extract(string, "\\d{4}-\\d{2}-\\d{2}"), format="%Y-%m-%d")
# [1] "2013-08-21"