library("openentreprise") library("magrittr") library("knitr")
request_533735932 <- get_openentreprise(.siren = "533735932")
extract_url(x = request_533735932)
get_url(.siren = "533735932")
get_financialdata(.siren = "533735932") %>% kable(caption = "Financial data")
extract_bodacc(x = request_533735932) %>% kable()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.