Для l oop в R для извлечения текста из файлов png

Question

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

filenames <- list.files(path = "C:/Users/tmpxk9/Documents", pattern="*.png")

for (i in seq_along(filenames)) {
  xx <- magick::image_read("filenames[i]")
  xx %>%
    magick::image_resize("2000x") %>%
    magick::image_convert(type = 'Grayscale') %>%
    tesseract::ocr() %>%
    cat()
}

Выдает ошибку со следующей ошибкой:

Error in magick_image_readpath(enc2native(path), density, depth, strip) : 
  rsession.exe: UnableToOpenBlob `C:\Users\tmpxk9\Documents\filenames[i]': No such file or directory @ error/blob.c/OpenBlob/2701

Я уверен, что есть некоторые проблемы с l oop, я работаю на нем, но не в состоянии разобраться

Answer 1

То, как вы извлекаете имена файлов, они не включают в себя папку, в которой они хранятся. Чтобы получить полные пути с list.files(), вы должны включить аргумент full.names = TRUE.