Modifica arquivos que contém as seções para permitir a mescla

 - troca nome dos chunks
 - chama o pacote via devtools::load_all() provisoriamente

inst/slides/compoisson.Rnw

-<<setup-child, include=FALSE>>=
-set_parent("slides-mrdcr.Rnw")
+<<setup-childcmp, include=FALSE>>=
+# set_parent("slides-mrdcr.Rnw")
 
 ## Pacotes utilizados nesta seção
 ## library(MRDCr)

inst/slides/excesso_zeros.Rnw

-<<setup-child, include=FALSE>>=
-set_parent("slides-mrdcr.Rnw")
+<<setup-childexczero, include=FALSE>>=
+## set_parent("slides-mrdcr.Rnw")
 
 ## Pacotes utilizados nesta seção
 ## library(MRDCr)

inst/slides/gamma_count.Rnw

-<<setup-child, eval=FALSE, include=FALSE>>=
+<<setup-childgcnt, eval=FALSE, include=FALSE>>=
 set_parent("slides-mrdcr.Rnw")
 @
 
@@ -114,7 +114,9 @@ set_parent("slides-mrdcr.Rnw")
 
 \begin{frame}[fragile]
 <<fig.width = 9, fig.height = 4.5, out.width = "0.95\\textwidth">>=
-library(MRDCr)
+## library(MRDCr)
+devtools::load_all()
+
 grid <- expand.grid(lambda = c(2, 8, 15),
                     alpha = c(0.5, 1, 2.5))
 y <- 0:30

inst/slides/hurdle.Rnw

-<<setup-child, include=FALSE>>=
-set_parent("slides-mrdcr.Rnw")
+<<setup-childhurdle, include=FALSE>>=
+## set_parent("slides-mrdcr.Rnw")
 
 ## Pacotes utilizados nesta seção
 

inst/slides/pois_bineg.Rnw

-<<setup-child, include=FALSE>>=
-set_parent("slides-mrdcr.Rnw")
+<<setup-childpoisbneg, include=FALSE>>=
+## set_parent("slides-mrdcr.Rnw")
 @
 
 %%%-----------------------------------------------------------------------------------------
@@ -31,7 +31,7 @@ Alguns exemplos de problemas envolvendo contagens:
 \begin{itemize}
     \item Modelos probabilísticos para variáveis aleatórias discretas, com suporte no conjunto de números inteiros não-negativos, são potenciais candidatos para a análise de dados de contagens.
     
-\vspace{0.5cm}    
+\vspace{0.5cm}
     
     \item Algumas alternativas: Distribuição Binomial, Poisson e generalizações; distribuições geradas por misturas, como a beta-binomial, binomial negativa; distribuições fundamentadas na modelagem do tempo entre eventos, na razão de probabilidades sucessivas...
     
@@ -572,10 +572,8 @@ $$ \hat{\phi} = \frac{1}{n-p}\sum_{i=1}^n \frac{y_i-\hat{\mu}_i}{V(\hat{\mu}_i)}
 %%%-----------------------------------------------------------------------------------------
 
 %%% Slide 47
-\section{Modelos Paramétricos Alternativos}
-\label{sec-modelos-parametricos}
 
-\subsection{Modelo Binomial Negativa}
+\section{Modelo Binomial Negativa}
 \label{sec-binomial-negativa}
 
 \begin{frame}{Distribuição binomial negativa} 

inst/slides/poisson_generalizada.Rnw

-<<setup-child, eval=FALSE, include=FALSE>>=
+<<setup-childpgnz, eval=FALSE, include=FALSE>>=
 set_parent("slides-mrdcr.Rnw")
 @
 
@@ -109,7 +109,8 @@ set_parent("slides-mrdcr.Rnw")
 \begin{frame}[fragile]
   \frametitle{Implementação da log-verossimilhança}
 <<echo = TRUE>>=
-library(MRDCr)
+## library(MRDCr)
+devtools::load_all()
 llpgnz
 @
 \end{frame}
@@ -159,7 +160,3 @@ useOuterStrips(xyplot(py ~ y | factor(lambda) + factor(alpha),
   \end{description}
 \end{frame}
 
-\begin{frame}
-  \frametitle{Conclusões}
-  TODO
-\end{frame}

inst/slides/zeroinfl.Rnw

-<<setup-child, include=FALSE>>=
-set_parent("slides-mrdcr.Rnw")
-
-## Pacotes utilizados nesta seção
+<<setup-childzeroinfl, include=FALSE>>=
+## set_parent("slides-mrdcr.Rnw")
 
 @