19 lines
381 B
Markdown
19 lines
381 B
Markdown
|
<!-- snippet:syntax-only -->
|
||
|
|
|
||
|
|
```r title="R"
|
||
|
|
library(kreuzberg)
|
||
|
|
library(httr2)
|
||
|
|
|
||
|
|
response <- request("http://localhost:8000/extract") |>
|
||
|
|
req_method("POST") |>
|
||
|
|
req_multipart_part(
|
||
|
|
name = "files",
|
||
|
|
path = "document.pdf",
|
||
|
|
type = "application/pdf"
|
||
|
|
) |>
|
||
|
|
req_perform()
|
||
|
|
|
||
|
|
data <- resp_body_json(response)
|
||
|
|
cat(jsonlite::toJSON(data, auto_unbox = TRUE, pretty = TRUE))
|
||
|
|
```
|