Annual financial accounts for general government - gov_10a_ggfa

Data - Eurostat

Author

François Geerolf

Info

DOWNLOAD_TIME

Code 
tibble(DOWNLOAD_TIME = as.Date(file.info("~/Library/Mobile\ Documents/com~apple~CloudDocs/website/data/eurostat/gov_10a_ggfa.RData")$mtime)) %>%
  print_table_conditional()
DOWNLOAD_TIME
2024-10-08

Last

Code 
gov_10a_ggfa %>%
  group_by(time) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(time)) %>%
  head(1) %>%
  print_table_conditional()
time Nobs
2023 68316

unit

Code 
gov_10a_ggfa %>%
  left_join(unit, by = "unit") %>%
  group_by(unit, Unit) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}
unit Unit Nobs
MIO_EUR Million euro 583794
MIO_NAC Million units of national currency 583763
PC_GDP Percentage of gross domestic product (GDP) 579840

sector

Code 
gov_10a_ggfa %>%
  left_join(sector, by = "sector") %>%
  group_by(sector, Sector) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}
sector Sector Nobs
S13 General government 447917
S1311 Central government 413766
S1314 Social security funds 408408
S1312 State government 243978
S1313 Local government 233328

na_item

All

Code 
gov_10a_ggfa %>%
  left_join(na_item, by = "na_item") %>%
  group_by(na_item, Na_item) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

geo

Code 
gov_10a_ggfa %>%
  left_join(geo, by = "geo") %>%
  group_by(geo, Geo) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  mutate(Flag = gsub(" ", "-", str_to_lower(Geo)),
         Flag = paste0('<img src="../../bib/flags/vsmall/', Flag, '.png" alt="Flag">')) %>%
  select(Flag, everything()) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .}

time

Code 
gov_10a_ggfa %>%
  group_by(time) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(time)) %>%
  print_table_conditional()
time Nobs
2023 68316
2022 68358
2021 68358
2020 68358
2019 68358
2018 68358
2017 68358
2016 68358
2015 68358
2014 68358
2013 68358
2012 68358
2011 68328
2010 68331
2009 68331
2008 68331
2007 67731
2006 67731
2005 67731
2004 67731
2003 67731
2002 67731
2001 67731
2000 67731
1999 66196
1998 14759
1997 11594
1996 11592
1995 7833