-
Notifications
You must be signed in to change notification settings - Fork 2
Expand file tree
/
Copy pathREADME.Rmd
More file actions
98 lines (69 loc) · 2.2 KB
/
README.Rmd
File metadata and controls
98 lines (69 loc) · 2.2 KB
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
---
output: github_document
---
```{r, echo = FALSE}
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
fig.path = "man/figures/README-"
)
```
<!-- badges: start -->
[](https://github.com/abjur/abjMaps/actions)
<!-- badges: end -->
# abjMaps <a href='http://abjur.github.io/abjMaps/'><img src='man/figures/logo.png' align="right" height="138.5" /></a>
## Visão geral
O objetivo do `{abjMaps}` é possibilitar a criação de mapas jurimétricos utilizando-se de recursos do pacote `sf` (contém ferramentas para armazenamento e acesso de características geográficas).
Para enriquecer a análise, são incluídos dados relativos aos estados, municípios e comarcas do Brasil. Até o momento, estão implementadas as bases para o TJSP e o TJRS.
Veja o arquivo `data-raw/comarcas_tjsp.R` para ver como organizamos nossos dados.
## Para instalar
Você pode instalar a versão mais recente do `{abjMaps}` com:
```{r gh-installation, eval = FALSE}
# install.packages("remotes")
remotes::install_github("abjur/abjMaps")
```
## Como usar
Para ilustrar, segue-se exemplos de uso:
Tribunal de Justiça de São Paulo:
```{r example}
library(abjMaps)
library(sf)
d_sf_tjsp
d_sf_tjrs
```
```{r fig-tjsp}
graphs <- purrr::imap(d_sf_tjsp$sf, ~{
ggplot2::ggplot(.x) +
ggplot2::geom_sf(
colour = "black",
size = .2
) +
ggplot2::ggtitle(.y) +
ggplot2::theme_void()
})
patchwork::wrap_plots(graphs)
```
Tribunal de Justiça do Rio Grande do Sul:
```{r fig-tjrs}
graphs <- purrr::imap(d_sf_tjrs$sf, ~{
ggplot2::ggplot(.x) +
ggplot2::geom_sf(
ggplot2::aes(fill = entrancia),
colour = "black",
size = .2
) +
ggplot2::scale_fill_viridis_d(begin = .2, end = .8) +
ggplot2::ggtitle(.y) +
ggplot2::theme_void()
})
patchwork::wrap_plots(graphs)
```
## Requisitos
`{abjMaps}` requer uma versão do R superior ou igual a 3.4.0.
## Licença
O `{abjMaps}` é licenciado sob os termos da [MIT](https://github.com/abjur/abjMaps/blob/master/LICENSE)
### Citation
To cite `abjMaps`, write `citation("abjMaps")`:
```{r cite}
citation("abjMaps")
```