Updates to include book front cover.

20-analise-covariancia.Rmd

@@ -671,7 +671,8 @@ grid <- attr(emm1, "grid")
 L <- attr(emm1, "linfct")
 rownames(L) <- grid$varied
 
-results <- wzRfun::apmc(X = L, model = m1, focus = "varied", test = "fdr")
+results <- wzRfun::apmc(X = L, model = m1,
+                        focus = "varied", test = "fdr")
 
 ggplot(data = results,
        mapping = aes(x = fit, y = reorder(varied, fit, mean))) +

_output.yml

@@ -8,7 +8,7 @@ bookdown::gitbook:
     toc:
       before: |
         <center style="margin: 1em;">
-          <img src="../config/logo.png" width="150px"/>
+          <img src="../config/mpaer-cover.png" width="180px" style="box-shadow: 0 1px 8px 0 rgba(0, 0, 0, 0.6);"/>
           <br/>
           <br/>
           <a href="./index.html" style="font-weight: bold; font-size: larger;">

index.Rmd

@@ -42,10 +42,11 @@ complement: >
   \end{center}
 ---
 
-<!-- # {-} -->
-
 <!-- Imagem de capa. -->
-<!-- <img src="config/capa.png" width="350" height="460" alt="Planejamento e Análise de Experimentos com R"/> -->
+```{r, echo = FALSE, results = "asis", eval = isOutput("html")}
+img <- '# {-}\n\n<img src="./config/mpaer-cover.png" width="350" alt="Manual de Planejamento e Análise de Experimentos com R" style="box-shadow: 0 1px 8px 0 rgba(0, 0, 0, 0.6);"/>'
+cat(img, "\n")
+```
 
 # Apresentação {-}