262 B
262 B
library(kreuzberg)
# Extract a PDF file
result <- extract_file_sync("example.pdf")
# Print a preview of the extracted content
content_preview <- substr(content(result), 1L, 200L)
cat("Content preview:\n")
cat(content_preview)
cat("\n...\n")