# NOT RUN {
if(is.na(match("fra", tesseract_info()$available)))
tesseract_download("fra")
french <- tesseract("fra")
text <- ocr("https://jeroen.github.io/images/french_text.png", engine = french)
cat(text)
# }
Run the code above in your browser using DataLab