R语言使用gsub从文件名提取指定日期的pattern与replacement参数设置

针对你给出的示例文件名LC08_L1TP_211048_20180705_20180717_01_T1_2018-07-05_B5.TIF，要提取首个8位纯数字格式的目标日期20180705，gsub的两个参数填写规则如下：

• pattern参数填写："^.*_(\\d{8})_\\d{8}.*$"
  匹配逻辑说明：从字符串开头匹配所有内容直到目标8位日期前的下划线，用捕获组标记目标8位数字，再匹配后续紧跟的第二个8位数字段和剩余所有内容
• replacement参数填写："\\1"
  替换逻辑说明：将整个匹配到的完整文件名字符串，替换为第一个捕获组的内容，也就是我们需要的目标日期

你可以用以下代码测试效果：

test_filename <- "LC08_L1TP_211048_20180705_20180717_01_T1_2018-07-05_B5.TIF"
target_date <- gsub(pattern = "^.*_(\\d{8})_\\d{8}.*$", replacement = "\\1", x = test_filename)
print(target_date)

运行后输出结果为"20180705"，符合需求。

内容的提问来源于stack exchange，提问作者coder_001