Nomad changes

docs/snippets/r/ocr/image_preprocessing.md

@@ -0,0 +1,16 @@
+```r title="R"
+library(kreuzberg)
+
+config <- list(
+  force_ocr = TRUE,
+  ocr = list(backend = "tesseract", language = "eng"),
+  enable_quality_processing = TRUE
+)
+
+json <- extract_file_sync("scan.png", "image/png", config)
+result <- jsonlite::fromJSON(json, simplifyVector = FALSE)
+
+cat(sprintf("Quality: %.2f, Length: %d\n",
+            result$quality_score %||% 0,
+            nchar(result$content)))
+```