在以分钟为单位的时差可被r中的10整除的条件下，从开始日期获取结束日期

我试图解决一些神秘的谜题，以确定一些小偷使用一些df如下所示。我已经能够缩小搜索范围使用一些设置标准，除了最后一个

library(tidyr)
df1<- tidyr::separate(suspect_times, Time.Spotted, c("date", "time"), sep = " ")

library（tidyr）
df1=“12-00-00”和df1$time=“2018-10-18”和df1$date请以可复制的格式共享数据@这里是我的数据框架结构的一个子集（list（Name=c（“玛丽·马丁”、“伍迪·艾伦”）、职业=c（“女演员”、“导演”）、日期=c（“周一”、“周一”）、时间=c（“12:41:00”、“04:42:30”）、row.names=1:2、class=c（“tbl_df”、“tbl”、“data.frame”））
library(lubridate)
df1[df1$time >= "12-00-00" & df1$time <= "23-59-59", ]

## Subsetting the date to fall within some defined date as shown
df1[df1$date >= "2018-10-18" & df1$date <= "2018-11-22", ]

## converting the dates in weekdays

df2 <- df1 ##replicating df1
df2$date <- strftime(df2$date, "%A") ##converting dates to weekdays
df2  ##Print converted data

df3<-df2[!(df2$date=="Tuesday" | df2$date=="Thursday"),]
df3