Home

/

GitHub

/

jtrecenti/brunoSalama

/

README.md

README.md
In jtrecenti/brunoSalama:

Estudo preliminar no TJSP Bruno Salama

Julio Trecenti r Sys.Date()

Reprodutibilidade

Caso queira reproduzir essa pesquisa, clone o repositório e carregue o projeto clicando no arquivo .RProj.

git clone https://github.com/jtrecenti/brunoSalama

No RStudio, rode

devtools::use_data_raw()
devtools::document()
devtools::install()

Em seguida, rode os códigos do arquivo vignettes/bruno-salama.Rmd cuidadosamente, chunk por chunk, verificando os resultados de cada passo. O processo é instável pois depende de internet e configurações de OS. Recomendável utilizar linux.

Pacotes

library(dplyr)
library(stringr)
library(tidyr)
library(lubridate)
library(purrr)
library(httr)
library(ggplot2)
library(brunoSalama)
knitr::opts_chunk$set(echo = FALSE)

Sobre a pesquisa

Nesse estudo, vamos buscar dados no TJSP para ver se uma pesquisa é factível.

Hipótese: % de julgamento pró devedor muda de acordo com a taxa de juros.

Filtro temporal: Sentenças de 2014
Nenhum filtro regional
Filtro de palavra-chave: emprestimo

## [1] 45428

Somente quando nao aparece “financiamento de veiculo”

Somente bancos
Nao precisa ser digital

Valor da ação
Tempo
Informações para pegar CJPG
- Resultado: tirar acordos, classificar processos como PROCEDENTE, IMPROCEDENTE e PARCIALMENTE, OUTROS/VAZIO.
- Juiz
- Vara
- Juros (olhar documentos)

Resultados dos processos

Análise descritiva

{"x":{"filter":"none","data":[["1","2","3","4"],["IMPROCEDENTE","PARCIALMENTE","PROCEDENTE","ACORDO/EXTINTO/VAZIO"],[8698,6942,6111,2238],["36.3%","28.9%","25.5%","9.3%"]],"container":"\n \n \n \n \n \n \n \n \n

	result	n	prop

","options":{"columnDefs":[{"className":"dt-right","targets":2},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

	magistrado	n	prop

","options":{"columnDefs":[{"className":"dt-right","targets":2},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

	magistrado	n	ACORDO/EXTINTO/VAZIO	IMPROCEDENTE	PARCIALMENTE	PROCEDENTE

","options":{"columnDefs":[{"className":"dt-right","targets":[2,3,4,5,6]},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

## Observations: 23,989
## Variables: 16
## $ n_processo        (chr) "00000012820138260099", "0000002732013826037...
## $ digital           (lgl) FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FA...
## $ data_distribuicao (date) 2013-01-07, 2013-01-08, 2014-01-09, 2014-01...
## $ valor             (dbl) 3566.87, 19740.99, 3676.58, 51315.90, 7130.4...
## $ txt               (chr) "\n\nSENTENÇA\n\nProcesso nº:0000001-28.2013...
## $ magistrado        (chr) "Adriana Andrade Pessi", "Ayman Ramadan", "F...
## $ comarca           (chr) "Bragança Paulista", "Monte Azul Paulista", ...
## $ foro              (chr) "Foro de Bragança Paulista", "Foro de Monte ...
## $ vara              (chr) "2ª Vara Cível", "Vara Única", "Vara do Juiz...
## $ data_sentenca     (date) 2014-04-30, 2014-06-23, 2014-04-01, 2014-10...
## $ cod_sentenca      (chr) "2RZ0D00010000-99-PG5JUN-15243022", "AAZ0D00...
## $ autor             (chr) "Claudio Ramalho", "Rafael Calin Zeitoum", "...
## $ reu               (chr) "Banco Santander Leasing S/A Arrendamento Me...
## $ tempo             (dbl) 478, 531, 82, 265, 390, 151, 589, 75, 594, 3...
## $ valor_sm          (dbl) 4.403543, 24.371593, 4.538988, 63.352963, 8....
## $ result            (chr) "PARCIALMENTE", "IMPROCEDENTE", "PROCEDENTE"...

Observa-se que os processos digitais são mais recentes. Isso é óbvio, mas significa que não é possível comparar o tempo de processos digitais e físicos, pois há uma truncagem e só consideraríamos os processos digitais mais recentes.

Observa-se algumas flutuações e uma queda de produtividade no final/início do ano, mas nada muito relevante

##   0%  10%  20%  30%  40%  50%  60%  70%  80%  90% 100% 
##    1   77  120  169  224  290  364  465  609  829 9627

O tempo é altamente assimétrico, apresentando 48 valores que podem ser considerados aberrantes (> 10 anos). Sugere-se remover essas observações.

	comarca	n	prop

","options":{"columnDefs":[{"className":"dt-right","targets":2},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

Por quê Campinas/Guarulhos não está em segundo? Por quê Franca está em segundo? Possível explicação: viés na disponibilidade dos dados.

	comarca	n	ACORDO/EXTINTO/VAZIO	IMPROCEDENTE	PARCIALMENTE	PROCEDENTE

","options":{"columnDefs":[{"className":"dt-right","targets":[2,3,4,5,6]},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

Também é possível notar que as decisões mudam bastante por comarca...

	comarca	foro	n	ACORDO/EXTINTO/VAZIO	IMPROCEDENTE	PARCIALMENTE	PROCEDENTE

","options":{"columnDefs":[{"className":"dt-right","targets":[3,4,5,6,7]},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

... E por foro...

{"x":{"filter":"none","data":[["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"],["Foro Regional VII - Itaquera","Foro Regional II - Santo Amaro","Foro Regional III - Jabaquara","Foro Regional V - São Miguel Paulista","Foro Regional VII - Itaquera","Foro Central Cível","Foro Central Cível","Foro Central Cível","Foro Central Cível","Foro Regional V - São Miguel Paulista","Foro Regional V - São Miguel Paulista","Foro Central Cível","Foro Regional I - Santana","Foro Central Cível","Foro Central Cível","Foro Central Cível","Foro Regional III - Jabaquara","Foro Regional III - Jabaquara","Foro Central Cível","Foro Regional VI - Penha de França","Foro Central Cível","Foro Central Cível","Foro Regional VII - Itaquera","Foro Central Cível","Foro Regional IV - Lapa","Foro Central Cível","Foro Central Cível","Foro Central Cível","Foro Central Cível","Foro Regional III - Jabaquara","Foro Regional II - Santo Amaro","Foro Central Cível","Foro Central Cível","Foro Regional II - Santo Amaro","Foro Regional X - Ipiranga","Foro Regional VIII - Tatuapé","Foro Central Cível","Foro Regional IV - Lapa","Foro Central Cível","Foro Central Cível","Foro Regional III - Jabaquara","Foro Regional IV - Lapa","Foro Central Cível","Foro Regional VII - Itaquera","Foro Central Cível","Foro Regional II - Santo Amaro","Foro Regional I - Santana","Foro Regional VIII - Tatuapé","Foro Regional V - São Miguel Paulista","Foro Central Cível","Foro Central Cível","Foro Central Cível","Foro Regional I - Santana","Foro Central Cível","Foro Regional II - Santo Amaro","Foro Regional I - Santana","Foro Regional IV - Lapa","Foro Central Cível","Foro Central Cível","Foro Regional VI - Penha de França","Foro Central Cível","Foro Central Cível","Foro Regional VIII - Tatuapé","Foro Central Cível","Foro Central Cível","Foro Regional I - Santana","Foro Regional VI - Penha de França","Foro Central Cível","Foro Central Cível","Foro Central Cível","Foro Central Cível","Foro Regional II - Santo Amaro","Foro Regional II - Santo Amaro","Foro Regional II - Santo Amaro","Foro Regional VIII - Tatuapé","Foro Regional III - Jabaquara","Foro Regional VII - Itaquera","Foro Regional II - Santo Amaro","Foro Regional IX - Vila Prudente","Foro Regional VIII - Tatuapé","Foro Central Cível","Foro Regional I - Santana","Foro Central Cível","Foro Regional I - Santana","Foro Regional IV - Lapa","Foro Central Cível","Foro Central Cível","Foro Regional I - Santana","Foro Central Cível","Foro Regional XI - Pinheiros","Foro Regional I - Santana","Foro Regional XI - Pinheiros","Foro Central Cível","Foro Regional X - Ipiranga","Foro Central Cível","Foro Regional XI - Pinheiros","Foro Regional XI - Pinheiros","Foro Regional IX - Vila Prudente","Foro Regional V - São Miguel Paulista","Foro Regional VI - Penha de França","Foro Regional XI - Pinheiros","Foro Regional XI - Pinheiros","Foro Regional X - Ipiranga","Foro Regional X - Ipiranga","Foro Regional IX - Vila Prudente","Foro Regional II - Santo Amaro","Foro Regional V - São Miguel Paulista","Foro Regional IX - Vila Prudente","Foro Regional VI - Penha de França","Foro Regional VII - Itaquera","Foro Distrital de Parelheiros","Foro Regional VIII - Tatuapé","Foro Central Juizados Especiais Cíveis","Foro Regional IX - Vila Prudente","Foro Regional IV - Lapa","Foro Central Cível","Foro Regional III - Jabaquara","Foro Regional II - Santo Amaro","Foro Regional XV - Butantã"],["Vara do Juizado Especial Cível","7ª Vara Cível","3ª Vara Cível","1ª Vara Cível","5ª Vara Cível","37ª Vara Cível","40ª Vara Cível","24ª Vara Cível","30ª Vara Cível","4ª Vara Cível","3ª Vara Cível","43ª Vara CÍvel","4ª Vara Cível","17ª Vara Cível","3ª Vara Cível","45ª Vara Cível","4ª Vara Cível","1ª Vara Cível","18ª Vara Cível","1ª Vara Cível","19ª Vara Cível","41ª Vara Cível","2ª Vara Cível","27ª Vara Cível","2ª Vara Cível","32ª Vara Cível","36ª Vara Cível","15ª Vara Cível","9ª Vara Cível","2ª Vara Cível","1ª Vara Cível","7ª Vara Cível","8ª Vara Cível","4ª Vara Cível","3ª Vara Cível","5ª Vara Cível","44ª Vara Cível","1ª Vara do Juizado Especial Cível","42ª Vara Cível","5ª Vara Cível","5ª Vara Cível","4ª Vara Cível","11ª Vara Cível","3ª Vara Cível","4ª Vara Cível","8ª Vara Cível","8ª Vara Cível","3ª Vara Cível","2ª Vara Cível","2ª Vara Cível","12ª Vara Cível","13ª Vara Cível","3ª Vara Cível","21ª Vara Cível","6ª Vara Cível","7ª Vara Cível","3ª Vara Cível","25ª Vara Cível","39ª Vara Cível","3ª Vara Cível","16ª Vara Cível","6ª Vara Cível","1ª Vara Cível","22ª Vara Cível","38ª Vara Cível","6ª Vara Cível","1ª Vara do Juizado Especial Cível","14ª Vara Cível","1ª Vara Cível","34ª Vara Cível","28ª Vara Cível","5ª Vara Cível","2ª Vara Cível","3ª Vara Cível","2ª Vara Cível","1ª Vara do Juizado Especial Cível","1ª Vara Cível","1ª Vara do Juizado Especial Cível","4ª Vara Cível","4ª Vara Cível","10ª Vara Cível","5ª Vara Cível","20ª Vara Cível","9ª Vara Cível","1ª Vara Cível","23ª Vara Cível","29ª Vara Cível","1ª Vara Cível","33ª Vara Cível","4ª Vara Cível","2ª Vara Cível","2ª Vara Cível","35ª Vara Cível","1ª Vara do Juizado Especial Cível","31ª Vara Cível","3ª Vara Cível","5ª Vara Cível","1ª Vara Cível","Juizado Especial Cível - CIC Zona Leste","4ª Vara Cível","1ª Vara Cível","1ª Vara do Juizado Especial Cível","1ª Vara Cível","2ª Vara Cível","1ª Vara do Juizado Especial Cível","Juizado Especial Cível - CIC Feitiço da Vila","1ª Vara do Juizado Especial Cível","2ª Vara Cível","2ª Vara Cível","4ª Vara Cível","Vara","1ª Vara do Juizado Especial Cível","Juizado Especial Cível Anexo Mackenzie","3ª Vara Cível","Juizado Especial Cível Anexo UNIP","26ª Vara Cível","Juizado Especial Cível Anexo UNIP","Juizado Especial Cível Anexo UNISA","1ª Vara Cível"],[220,180,179,132,114,111,108,107,104,102,92,91,89,85,85,85,79,78,75,75,74,73,73,72,72,71,71,70,70,69,69,66,66,66,66,64,58,58,57,57,57,57,56,56,54,53,53,53,52,51,50,49,49,46,46,46,46,45,45,44,42,41,41,40,40,40,40,39,39,39,38,38,37,37,37,36,36,35,35,34,33,32,31,31,31,30,30,30,29,28,27,27,26,26,25,24,24,23,23,22,21,21,21,19,18,17,17,16,15,14,13,13,12,12,9,5,2,1,1],[0.0136,0.0111,0.0447,0.1894,0.0088,0.009,0.0648,0.1028,0.0481,0.0392,0.4239,0.0879,0.0112,0.0941,0.0235,0.0471,0.3038,0.2949,0.0133,0.1733,0,0.3836,0,0.0972,0.0139,0.0704,0.0986,0.0286,0.1429,0,0,0.0758,0.0455,0.0303,0.2576,0.0156,0.5862,0.069,0.0526,0.3333,0.2632,0,0.0893,0.0893,0.4444,0.0755,0.2642,0.0189,0.0385,0.0392,0.02,0.0612,0.0816,0.087,0.0217,0,0.087,0.0444,0,0.0227,0.0238,0.1951,0.4634,0.05,0.05,0.075,0,0.0769,0.0256,0.0256,0.0263,0.0789,0.0541,0.1892,0.3784,0.0833,0,0.0857,0,0.1471,0.0303,0.0625,0.2258,0.0323,0.0645,0.0333,0.1333,0.0333,0,0,0.1852,0.0741,0.0385,0.1154,0.08,0.2083,0,0.0435,0.0435,0.1364,0,0,0.0476,0.1053,0.1111,0.6471,0,0,0,0.0714,0.0769,0.1538,0,0.1667,0,0,0,0,0],[0.1864,0.2444,0.7598,0.25,0.7544,0.6486,0.2222,0.3458,0.4519,0.2647,0.0543,0.2967,0.5506,0.3529,0.6706,0.4941,0.4684,0.2949,0.5067,0.4533,0.4865,0.2877,0.7808,0.4444,0.7083,0.5352,0.5352,0.2714,0.6,0.5797,0.5507,0.4394,0.8636,0.8182,0.1818,0.4219,0.0172,0.431,0.193,0.4737,0.5439,0.7193,0.3929,0.3393,0.1667,0.5849,0.4528,0.566,0.3654,0.3333,0.38,0.2653,0.3673,0.3261,0.5435,0.2826,0.2174,0.3333,0.4889,0.6136,0.2619,0.1707,0.4146,0.275,0.425,0.375,0.225,0.359,0.4359,0.5128,0.2895,0.4211,0.3784,0.6216,0.3784,0.1667,0.5278,0.4857,0.8,0.6176,0.2424,0.5,0.4839,0.4839,0.3871,0.2667,0.3,0.6667,0.4828,0.5357,0.2593,0.4815,0.3846,0.4615,0.32,0.2917,0.5417,0.7391,0.1739,0.5,0.619,0.2381,0.4286,0.3684,0.2222,0.1176,0.4118,0.5625,0.3333,0.3571,0.5385,0.2308,0,0.6667,0.7778,0.8,1,0,0],[0.6909,0.6167,0.1285,0.3182,0.1579,0.2072,0.5556,0.4019,0.2692,0.5392,0.5217,0.4066,0.2584,0.5176,0.1765,0,0.1139,0.0128,0.1467,0.32,0.3378,0.2192,0.0548,0.2361,0.1667,0.2817,0.2535,0.2429,0.0286,0.1594,0.1884,0.2879,0.0455,0.1061,0.0758,0.4062,0.2931,0.1207,0.5263,0.0877,0.0702,0.0702,0.2679,0.375,0.3519,0.0566,0.2264,0.1887,0.25,0.1765,0.1,0.3265,0.2449,0.2174,0.1522,0.4348,0.1304,0.2,0.3778,0.2955,0.4524,0.3659,0.0488,0.35,0,0.175,0.3,0.3846,0.359,0.3077,0.4474,0.4211,0.3514,0.0811,0.1081,0.5,0.2222,0.1143,0.1429,0.2059,0.1818,0.3125,0.1935,0.2903,0.0968,0.4,0.1,0.0333,0.2414,0.3929,0.2593,0.2222,0.0385,0.1923,0.12,0.375,0.2083,0.087,0.4783,0.2273,0.1905,0.619,0.4762,0.4211,0.4444,0.0588,0.1765,0.3125,0.5333,0.3571,0.3077,0.3077,0.1667,0,0.1111,0,0,0,1],[0.1091,0.1278,0.067,0.2424,0.0789,0.1351,0.1574,0.1495,0.2308,0.1569,0,0.2088,0.1798,0.0353,0.1294,0.4588,0.1139,0.3974,0.3333,0.0533,0.1757,0.1096,0.1644,0.2222,0.1111,0.1127,0.1127,0.4571,0.2286,0.2609,0.2609,0.197,0.0455,0.0455,0.4848,0.1562,0.1034,0.3793,0.2281,0.1053,0.1228,0.2105,0.25,0.1964,0.037,0.283,0.0566,0.2264,0.3462,0.451,0.5,0.3469,0.3061,0.3696,0.2826,0.2826,0.5652,0.4222,0.1333,0.0682,0.2619,0.2683,0.0732,0.325,0.525,0.375,0.475,0.1795,0.1795,0.1538,0.2368,0.0789,0.2162,0.1081,0.1351,0.25,0.25,0.3143,0.0571,0.0294,0.5455,0.125,0.0968,0.1935,0.4516,0.3,0.4667,0.2667,0.2759,0.0714,0.2963,0.2222,0.5385,0.2308,0.48,0.125,0.25,0.1304,0.3043,0.1364,0.1905,0.1429,0.0476,0.1053,0.2222,0.1765,0.4118,0.125,0.1333,0.2143,0.0769,0.3077,0.8333,0.1667,0.1111,0.2,0,1,0]],"container":"\n \n \n \n \n \n \n \n \n \n \n \n \n

	foro	vara	n	ACORDO/EXTINTO/VAZIO	IMPROCEDENTE	PARCIALMENTE	PROCEDENTE

","options":{"columnDefs":[{"className":"dt-right","targets":[3,4,5,6,7]},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

... E por vara.

{"x":{"filter":"none","data":[["1"],[71.61],[941.12],[0],[5.26],[12.51],[35.8],[73827.16]],"container":"\n \n \n \n \n \n \n \n \n \n \n \n \n

	media	sd	min	1quart	mediana	3quart	max

","options":{"columnDefs":[{"className":"dt-right","targets":[1,2,3,4,5,6,7]},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

Pode-se observar que a variável é altamente assimétrica

	comarca	n	media	sd	min	1quart	mediana	3quart	max

","options":{"columnDefs":[{"className":"dt-right","targets":[2,3,4,5,6,7,8,9]},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

{"x":{"filter":"none","data":[["1","2","3","4"],["IMPROCEDENTE","PARCIALMENTE","PROCEDENTE","ACORDO/EXTINTO/VAZIO"],[8698,6942,6111,2238],[99.88,55.52,31.87,120.16],[1215.19,876.62,198.25,1119.99],[0.07,0.08,0,0.12],[8.02,3.12,4.08,7.16],[20.09,10.46,12.35,16.87],[45.45,32.31,26.42,43.17],[73827.16,64027.32,8041.96,31834.08]],"container":"\n \n \n \n \n \n \n \n \n \n \n \n \n \n \n

	result	n	media	sd	min	1quart	mediana	3quart	max

","options":{"columnDefs":[{"className":"dt-right","targets":[2,3,4,5,6,7,8,9]},{"orderable":false,"targets":0}],"order":[],"autoWidth":false,"orderClasses":false}},"evals":[]}

jtrecenti/brunoSalama documentation built on May 20, 2019, 3:16 a.m.

rdrr.io home R language documentation Run R code online

CRAN packages Bioconductor packages R-Forge packages GitHub packages

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

jtrecenti/brunoSalama

README.md
In jtrecenti/brunoSalama:

Estudo preliminar no TJSP Bruno Salama

Reprodutibilidade

Pacotes

Sobre a pesquisa

Filtro na Consulta de Julgados de Primeiro Grau

Filtro das sentenças baixadas

Download dos processos na Consulta de Processos de Primeiro Grau

Filtro na Consulta de Processos de Primeiro Grau

Informacoes pra pegar na CPO-PG

Resultados dos processos

Análise descritiva

Resultados

Juízes

Datas

Data de distribuição

Data da sentença

Tempo

Regionais

Resultados por comarca

Resultados por foro

Resultados por vara (Capital)

Valores

Valores e comarcas

Valores e decisões

R Package Documentation

Browse R Packages

We want your feedback!

jtrecenti/brunoSalama

README.md In jtrecenti/brunoSalama:

Estudo preliminar no TJSP Bruno Salama

Reprodutibilidade

Pacotes

Sobre a pesquisa

Filtro na Consulta de Julgados de Primeiro Grau

Filtro das sentenças baixadas

Download dos processos na Consulta de Processos de Primeiro Grau

Filtro na Consulta de Processos de Primeiro Grau

Informacoes pra pegar na CPO-PG

Resultados dos processos

Análise descritiva

Resultados

Juízes

Datas

Data de distribuição

Data da sentença

Tempo

Regionais

Resultados por comarca

Resultados por foro

Resultados por vara (Capital)

Valores

Valores e comarcas

Valores e decisões

R Package Documentation

Browse R Packages

We want your feedback!

README.md
In jtrecenti/brunoSalama: