Проверьте вектор загруженного JPG и найдите пропущенный идентификатор

Question

У меня есть список загруженных файлов JPG.Я хочу проверить количество идентификаторов отсутствующих загруженных изображений.

длина (id)> длина (myfiles)

id <- c("1", "2", "3")
myfiles <- c("C:/Users/uzytkownik/Pictures/image/1.jpg",
             "C:/Users/uzytkownik/Pictures/image/3.jpg")

Я хочу получить что-то вроде:

missing_id
[1] 2

Answer 1

Вы можете использовать sub для извлечения номера файла и %in% для проверки наличия всех значений id:

id[!id %in% sub("(?:.+/)(\\d+)\\.jpg?", "\\1", myfiles)]
# [1] "2"