prep/monitor_api.R

library(jsonlite)
library(httr)

tfs <- httr::GET("https://monitor.statnipokladna.cz/api/transakcni-data") %>%
  content(as = "text") %>%
  fromJSON() %>%
  unnest(cols = c(dataExtracts), .names_repair = "universal")
petrbouchal/statnipokladna documentation built on Aug. 23, 2024, 12:48 a.m.