library("openentreprise")
library("magrittr")
library("knitr")

Get information

request_533735932 <- get_openentreprise(.siren = "533735932") 

Browse Openentreprise.fr

extract_url(x = request_533735932)
get_url(.siren = "533735932")

Extract financial data

get_financialdata(.siren = "533735932") %>% 
  kable(caption = "Financial data")

Extract BODACC events

extract_bodacc(x = request_533735932) %>% 
  kable()


frrrenchieverse/openentreprise documentation built on May 25, 2019, 5:23 p.m.