Nomad changes

docs/snippets/r/metadata/language_detection.md

@@ -0,0 +1,23 @@
+```r title="R"
+library(kreuzberg)
+
+result <- extract_file_sync("document.pdf")
+
+cat("Language Detection Results:\n\n")
+
+cat("Using direct field access:\n")
+cat("Detected Language:", result$detected_language, "\n\n")
+
+cat("Using S3 helper function:\n")
+lang <- detected_language(result)
+cat("Language (via helper):", lang, "\n\n")
+
+cat("Language Information:\n")
+if (lang == "en") {
+  cat("This is an English document\n")
+} else if (lang == "es") {
+  cat("This is a Spanish document\n")
+} else {
+  cat(sprintf("This is a %s document\n", lang))
+}
+```