Coleta e organização da jurisprudência do TJSP

cjsg.R

### Instale o pacote remotes

install.packages("remotes")


## Instale também o pacote writexl para salvar em excel.
install.packages("writexl")

### Use o pacote remotes para instalar o pacote tjsp:

remotes::install_github("jjesusfilho/tjsp")


### Crie um diretório onde armazenaremos os julgados de segundo grau

dir.create("cjsg")


## Crie um diretorio para salvar o resultado final.

dir.create("dados")

### Carregue o pacote tjsp e o pacote writexl

library(tjsp)
library(writexl)

### Baixe a jurisprudência do TJSP com a palavra infanticídio. 
### Note que devemos colocar o nome do diretório no argumento diretório

tjsp_baixar_cjsg(
  livre = "infanticídio",
  aspas = FALSE,
  classe = "",
  assunto = "",
  orgao_julgador = "",
  inicio = "",
  fim = "",
  inicio_pb = "",
  fim_pb = "",
  tipo = "A",
  n = NULL,
  diretorio = "cjsg"
)

### Vamos ler esses dados

cjsg <- tjsp_ler_cjsg(diretorio = "cjsg")

### Visualize os dados

View(cjsg)

### Salve os dados em excel no diretório acima criado.

write_xlsx(cjsg, "dados/cjsg.xlsx")