Extract financial data from openentreprise API

extract_financialdata(x)

Arguments

x

a request to the open entreprise API

Value

a tibble with operating income and revenue

Examples

extract_financialdata(x = get_openentreprise(.siren = "533735932"))
#> # A tibble: 4 x 4 #> date revenue operatingincome employees #> <date> <dbl> <dbl> <dbl> #> 1 2012-01-01 232569 -36304 NA #> 2 2013-12-31 391541 72369 8 #> 3 2014-12-31 507634 80258 11 #> 4 2015-12-31 809866 39572 10
extract_financialdata(get_openentreprise(.siren = "339507394"))
#> Financial data aren't available
#> # A tibble: 0 x 4 #> # ... with 4 variables: date <date>, revenue <dbl>, operatingincome <dbl>, #> # employees <dbl>