In abjur/abjMaps: Organizing Data To Create Jurimetric Maps

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-"
)

abjMaps

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:

# 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:

library(abjMaps)
library(sf)
d_sf_tjsp
d_sf_tjrs

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:

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)