This commit is contained in:
13
docs/snippets/r/advanced/language_detection_multilingual.md
Normal file
13
docs/snippets/r/advanced/language_detection_multilingual.md
Normal file
@@ -0,0 +1,13 @@
|
||||
```r title="R"
|
||||
library(kreuzberg)
|
||||
|
||||
files <- c("english.pdf", "spanish.pdf", "french.pdf")
|
||||
config <- list(language_detection = list(enabled = TRUE))
|
||||
|
||||
for (file in files) {
|
||||
json <- extract_file_sync(file, "application/pdf", config)
|
||||
result <- jsonlite::fromJSON(json, simplifyVector = FALSE)
|
||||
cat(sprintf("%s: detected language = %s\n",
|
||||
file, result$detected_language))
|
||||
}
|
||||
```
|
||||
Reference in New Issue
Block a user