fixed case-sensitivity for filenames
This commit is contained in:
parent
6579b552ca
commit
852e549f70
|
@ -15,7 +15,7 @@ tesseract_download("deu") # German
|
||||||
|
|
||||||
|
|
||||||
# get list of JPG & JPEG image files
|
# get list of JPG & JPEG image files
|
||||||
imagelist <- list.files(path = "images/", pattern = ".jp")
|
imagelist <- list.files(path = "images/", pattern = ".jp|.JP")
|
||||||
|
|
||||||
|
|
||||||
# setup table for OCRed text
|
# setup table for OCRed text
|
||||||
|
@ -58,4 +58,5 @@ write.csv(ocrText,
|
||||||
paste0("ocrText-",
|
paste0("ocrText-",
|
||||||
gsub("\\s+|:", "", Sys.time()),
|
gsub("\\s+|:", "", Sys.time()),
|
||||||
".csv"),
|
".csv"),
|
||||||
|
na = "",
|
||||||
row.names = F)
|
row.names = F)
|
Loading…
Reference in New Issue