Solución del problema
Solo necesita imitar esa solicitud POST que envía valores de parámetro en blanco en el cuerpo JSON. No se requiere ninguno de los encabezados o cookies.
library(httr2)
library(magrittr)
r <- request("https://www.domstol.no/api/episerver/v3/beramming/") %>%
req_body_json(list('To' = '', 'From' = '', 'CaseAbout' = '', 'CaseNumber' = '')) %>%
req_perform() %>%
resp_body_json()
library(purrr)
df <- map_dfr(r, ~ data.frame(.x))
O según OP en los comentarios re df del resultado de la llamada
library(httr2)
library(magrittr)
library(dplyr)
df <- request("https://www.domstol.no/api/episerver/v3/beramming/") %>%
req_body_json(list('To' = '', 'From' = '', 'CaseAbout' = '', 'CaseNumber' = '')) %>%
req_perform() %>%
resp_body_json(simplifyVector = TRUE) %>%
tibble()
No hay comentarios:
Publicar un comentario