AbbyyRパッケージのocrFile関数でエラーが発生しました

Question

AbbyyクラウドSDKをOCRに使用していましたが、AbbyyRパッケージ内のocrFile関数を使用しようとすると、次のようなエラーが表示されます。

"curl_downloadでエラーが発生しました（finishedlist $ resultUrl [RESます$ id == finishedlistます$ ID]、：。 引数 'URL' は文字列でなければなりません"

私はクラウドにファイルを送信し、それらのすべてを処理します正常に動作しますが、雲がファイルを返すとき。私はそれがネットワークまたは証明書の問題かもしれないが、私は問題を解決できないと考え、それらをダウンロードするという問題がある。事前に

おかげ

Answer 1

ありソースコードの問題で、urlのas.character（）関数が必要です。 私はpdf ocrFile関数は次のようになります。

install.packages("curl") 
    library(curl) 

    new_ocrFile<-function (file_path = "", output_dir = "./", exportFormat = c("txt", 
                    "txtUnstructured", "rtf", "docx", "xlsx", "pptx", "pdfSearchable", 
                    "pdfTextAndImages", "pdfa", "xml", "xmlForCorrectedImage", 
                    "alto"), save_to_file = TRUE) 
    { 
     exportFormat <- match.arg(exportFormat) 
     res <- processImage(file_path = file_path, exportFormat = exportFormat) 
     while (!(any(as.character(res$id) == as.character(listFinishedTasks()$id)))) { 
     Sys.sleep(1) 
     } 
     finishedlist <- listFinishedTasks() 
     res$id <- as.character(res$id) 
     finishedlist$id <- as.character(finishedlist$id) 
     if (identical(save_to_file, FALSE)) { 
     res <- curl_fetch_memory(as.character(finishedlist$resultUrl[res$id == 
                  finishedlist$id])) 
     return(rawToChar(res$content)) 
     } 
     curl_download(as.character(finishedlist$resultUrl[res$id == finishedlist$id]), 
        destfile = paste0(output_dir, unlist(strsplit(basename(file_path), 
                    "[.]"))[1], ".", exportFormat)) 
    } 

私は願っています。