无唯一标识符时，如何cbind/join不同长度的检测结果与日期data frame？

我尝试对两个无唯一标识符的data frame执行cbind/join操作，数据由网页抓取获取，格式较为复杂。df1包含检测结果数据：每日的每一项检测对应一行，同时存在以（ID, Name, Concentration）为内容的分隔行，用于区分不同日期的检测数据；df2则每行对应一个检测日期。我需要将df2中的检测日期绑定到df1中。

数据示例 #

df1 <- data.frame(X1 = c("ID", "1", "2", "3", "4", "5", "ID", "1", "2", "3", "ID", "1", "2"),
                  X2 = c("Name", "Jose", "Mary", "Doug", "Luisa", "Pam", "Name", "Jose", "Doug", "Lou", "Name", "Luisa", "Pam"),
                  X3 = c("Concentration", "4.2", "2.3", "7.3", "1.4", "0.5", "Concentration", "0.1", "2.3", "2.1", "Concentration", "9.0", "1.4"))
df2 <- data.frame(X4 = c("Monday", "Tuesday", "Friday"),
                  X5 = c("January", "February", "March"),
                  X6 = c("12", "4", "21"))

期望结果 #

将df2的每一行日期信息，对应匹配到df1中一组以（ID, Name, Concentration）开头的检测数据块，最终让每个有效检测数据行都带上对应的日期列（即去掉分隔行后，每条检测记录绑定对应日期）。

当前困境 #

我尝试为同一日期的检测数据创建标识符，但因每日检测数量差异较大而未成功。实际场景中，我有超过20万条检测数据，涉及几十个日期。

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