-
Notifications
You must be signed in to change notification settings - Fork 3
/
README.Rmd
214 lines (142 loc) · 10 KB
/
README.Rmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
---
output: github_document
---
<!-- README.md is generated from README.Rmd. Please edit that file -->
```{r, include = FALSE}
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
fig.path = "man/figures/README-",
out.width = "100%"
)
```
# statnipokladna <img src='man/figures/logo.png' align="right" height="138" />
<!-- badges: start -->
[](https://CRAN.R-project.org/package=statnipokladna)
[](https://CRAN.R-project.org/package=statnipokladna)
[](https://CRAN.R-project.org/package=statnipokladna)
[](https://lifecycle.r-lib.org/articles/stages.html)
[](https://github.com/petrbouchal/statnipokladna/actions/workflows/R-CMD-check.yaml)
<!-- badges: end -->
The goal of statnipokladna is to provide programmatic access to open data from the Státní pokladna system. Státní pokladna is a comprehensive budgeting, reporting and accounting system for Czech public organisations. This package provides user-friendly ways to access the open data from that system available at <https://monitor.statnipokladna.cz>. The vignettes in the package also provide an introduction to the underlying data.
## Installation
You can install the released version from CRAN:
``` r
install.packages("statnipokladna")
```
You can install the current development release of statnipokladna from
[GitHub](https://github.com/petrbouchal/statnipokladna) with:
``` r
remotes::install_github("petrbouchal/statnipokladna",
build_vignettes = TRUE,
ref = github_release())
```
or the latest in-development version with
``` r
remotes::install_github("petrbouchal/statnipokladna",
build_vignettes = TRUE)
```
I also keep binaries in a `drat` repo, which you can access by
``` r
install.packages("statnipokladna", repos = "https://petrbouchal.xyz/drat")
```
## Bug reports
Please report bugs at https://github.com/petrbouchal/statnipokladna/issues.
## What this package enables you to do:
- get cleaned-up, ready to analyse data frames based on open data dumps from the public finance database
- the package draws on the online data and returns a clean data frame
- the resulting data is ready to merge into time series
- time series is built based on user input
- do this through a consistent API which supplements some of the documentation that is missing from the official endpoints (*still subject to some change*)
- access registers published alongside the data (e.g. lists of public organisations with their identifiers and metadata), some of which can be useful in other contexts
- augment the core data with the desired type of register
See the [Get started](https://petrbouchal.xyz/statnipokladna/articles/statnipokladna.html) vignette for background on the underlying data.
See also [Background information] below.
## How does this compare to the [official analytical interface](https://monitor.statnipokladna.cz/)?
- no limit on the number of data points
- no limits on the number of organisations, unlike the official interface which forces you to use a filter on some tables
- different reports (local gov, central gov...) in one place in consistent form
- much faster for analysis (the current version of the online interface takes long to render)
- reproducible!!! While the online interface provides a permanent link to your analysis, this must be copied manually and does not necessarily provide an easily legible overview of how the analysis was produced (filters, columns etc.)
- no need for the web => excel => R dance
- drawback: for some reports, the data is published in different forms for different time periods (pre- and post-2015)
- drawback: consolidation must be done manually
### Future development
the official system has been partially overhauled in February 2020 and I am trying to find out about which parts of its new API will remain stable and can be used externally. Depending on the result, some functionality in this package can be streamlined and some can be added - e.g.
- listing of available releases
- checking against existing releases and data sets
- retrieving some previously unpublished data e.g. calculated indicators and budget responsibility monitoring
## Getting started
```{r message=FALSE, warning=FALSE}
library(statnipokladna)
```
Get data from a particular part (file) of a dataset ("výkaz"):
```{r}
local_budgets <- sp_get_table(table_id = "budget-local", # table ID, see `sp_tables`
year = 2019,
month = 9)
```
The data is automatically downloaded to a temp directory, so it will be reused by future calls to `sp_get_table()` made in the same session, unless you set `force_redownload = TRUE`. You set the `dest_dir` parameter e.g. to `"."`, a directory will be created in your current working directory and the data will be downloaded into it so that it can persist across sessions.
It is a rather raw-looking data frame...
```{r}
head(local_budgets)
```
but it has been cleaned up, and can be enriched with any of the metadata codelists:
```{r}
functional_categories <- sp_get_codelist("paragraf")
```
```{r}
functional_categories
```
This contains all codes for this codelist, some of which are not valid for the time period of our core data. The function `add_codelist()` resolves this automatically.
As you can see below, you can
- add multiple codelists in one pipe
- add a codelist without downloading it first - just pass its ID to the function as a character instead of an object.
Codelists are also cached, but you have one in your namespace, you can pass it as an object, provided that it has the right columns.
```{r}
local_budgets %>%
sp_add_codelist(functional_categories) %>%
sp_add_codelist("polozka")
```
Download a whole "výkaz" (dataset/data dump):
```{r}
sp_get_dataset("finm", year = 2019) # dataset ID, see `sp_datasets`
```
This will put the files in a temp directory.
Then look at its documentation:
```{r}
statnipokladna::sp_get_dataset_doc("finm")
```
You can get details of all the available tables in the `sp_tables` data frame; for datasets, see `sp_datasets`.
## Workflows and reproducibility
The above examples present a simple all-in-one workflow, which is concise but can be too opaque when transparency and reproducibility matter.
It is primarity aimed at workflows which prioritise updating data: every time the script is run, data is redownloaded, unless cached via the `dest_dir` parameter.
In other situations, the priority might be to keep track of individual source files as they are downloaded from the data provider, or checking for changes at the data provider and keeping track of individual URLs from which the data was downloaded.
For these situations, a workflow composed of lower-level functions is available, offering finer control of the steps. See the [workflow](https://petrbouchal.xyz/statnipokladna/articles/workflow.html) vignette (`vignette("workflow", package = "statnipokladna")`).
## Background information
Note that while the package provides a bridge from complicated data dumps to a clean data structure, you still need quite a bit of domain knowledge to be able analyse the data safely.
See the ["How the data works"](https://petrbouchal.xyz/statnipokladna/articles/how-the-data-works-cz.html) vignette (in Czech only, the terminology is impossible to translate) for an overview of the structure of the data on which this package draws. This also contains some notes useful for interpreting the data.
A subset of this information is in the [Get started](https://petrbouchal.xyz/statnipokladna/articles/statnipokladna.html) vignette.
There is also a log of various data gotchas I discovered, also in Czech only, stored in the [data issues vignette](https://petrbouchal.xyz/statnipokladna/articles/data-issues-cz.html).
A basic glossary of some of the terms used in the data sets is at <https://monitor.statnipokladna.cz/metodika/>.
### Note
Not created or endorsed by the Czech Ministry of Finance, who produce the data - but they definitely deserve credit for releasing the data and maintaining the application.
## See also
### R Packages
- [CzechData](https://jancaha.github.io/CzechData/) by @JanCaha for (mainly) geospatial data about the Czech Republic (both admin. boundaries and topology and geography)
- [RCzechia](https://cran.r-project.org/package=RCzechia) for another approach to Czech geospatial data and access to the official public geocoder and reverse geocoder
- [czso](https://github.com/petrbouchal/czso) for access to Czech statistical open data
- [eurostat](https://cran.r-project.org/package=eurostat) for access to Eurostat data
- [OECD](https://cran.r-project.org/package=OECD) for access to OECD data, incl. a large amount of financial and economic data
### Other Czech public data
- [National Open Data Catalogue](https://data.gov.cz/)
- [KNOD](https://github.com/kokes/knod) by Ondřej Kokeš for an overview of public data
- [Hlídač státu](https://www.hlidacstatu.cz/) by @michalblaha for easy (web and API) access to a large suite of transparency-focused datasets and their integration (public disclosures of contracts, tenders, political contributions...)
- CEDR (Centrální registr dotací) for a database of public subsidies, incl. to public bodies
## Acknowledgments
Thanks to @smallhillcz and the Státní pokladna/Monitor developers and maintainers for responding to queries and generally keeping the thing running.
## Contributing
See [CONTRIBUTING.md](https://github.com/petrbouchal/statnipokladna/blob/master/.github/CONTRIBUTING.md) for a guide on how to contribute to the project.
Please note that the 'statnipokladna' project is released with a
[Contributor Code of Conduct](https://petrbouchal.xyz/statnipokladna/CODE_OF_CONDUCT.html).
By contributing to this project, you agree to abide by its terms.