devtools::install_github("jjesusfilho/tjac")
Uma vez instalado, você deve carregar o pacote:
library(tjac)
Antes de baixar os dados, você deve autenticar-se como advogado:
autenticar_tjac(cpf = "123.456.789-10",senha = ""+jd4563)
Para baixar o html de um ou mais processos de primeiro grau, use a seguinte função:
processos <- "0004807-95.2019.8.01.0001"
dir.create("cpopg")
baixar_cpopg_tjac(processos = processos, diretorio = "cpopg" )
Para extrair os metadados, proceda como a seguir:
dados <- ler_dados_cpopg_tjac(diretorio = "cpopg")
A função abaixo, limpa e organiza os metadados extraídos:
dados <- organizar_dados_cpopg_tjac(dados)
Para ler as informações das partes:
partes <- ler_partes_tjac(diretorio = "cpopg")
Para ler a movimentação processual:
mov <- ler_movimentacao_cpopg_tjac(diretorio = "cpopg")
Para criar uma tabela com os documentos contidos na movimentação processual:
docs <- ler_tabela_documentos_tjac(diretorio = "cpopg")
Você pode em seguida filtrar os documentos de interesse:
library(tidyverse)
sentencas <- filter(docs,str_detect(documento,"(?i)^julgado"))
Em seguida, baixe os documentos:
dir.create("cpopg_docs")
baixar_docs_tjac(df = sentencas, diretorio = "cpopg_docs")
Please note that the ‘tjac’ project is released with a Contributor Code of Conduct. By contributing to this project, you agree to abide by its terms.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.