*Limpando memória
clear

*Tamanho da memória
set mem 200m

*Banco de dados
*Santos e Almeida (2005)
*Número de observações reduzido

*Abrindo banco de dados
use "C:\DCP859B4\santos2005.dta", clear

*Número de relatorias (variável dependente)
count
tab nr

*Escolhendo 40% dos casos aleatoriamente
sample 40, by(nr)

***VARIÁVEL DEPENDENTE
*Número de relatorias (nr)
count
tab nr

*Tamanho da amostra
di 787/1967*100

*Salvando banco reduzido
saveold "C:\DCP859B4\santos2005red.dta", replace

***ORDENAR BANCO
sort deputado semleg partido comissao

***VARIÁVEIS INDEPENDENTES
*Distância do cartel (distcart)
*Fidelidade da comissão (fidcom)
*Oposição preside a comissão (opoprec)*
*Especialista (espec)*
*Não-especialista com nível superior (nesup)*
*Tamanho do partido (tampartc)
*Fidelidade ao partido (fidpart)
*Log do tempo de filiação ao partido (anospart_lg)
*Probabilidade de seleção (prselc)
*Log do número de relatorias da comissão (nrelcom_lg)

*Verificar se a raiz da média da variável
*dependente é igual à variância
*desta mesma variável
sum nr

*Variância (desvio padrão ao quadrado)
di 0.3155671^2

*Variância (raiz da média)
di sqrt(0.0775095)

*As duas variâncias acima deveriam ter
*o mesmo valor.

***MODELO DE POISSON
poisson nr distcart fidcom opoprec espec ///
           nesup tampartc fidpart ///
           anospart_lg

***MODELO BINOMIAL NEGATIVO
nbreg nr distcart fidcom opoprec espec ///
         nesup tampartc fidpart ///
         anospart_lg, nolog

***MODELO DE ZERO INFLACIONADO
zinb nr distcart fidcom opoprec espec ///
        nesup tampartc fidpart ///
        anospart_lg prselc nrelcom_lg, ///
        inflate (prselc nrelcom_lg) nolog