From 0644fddbad25ad21aa4027317b8451357c10ba3c Mon Sep 17 00:00:00 2001
From: Walmes Zeviani <walmes@ufpr.br>
Date: Wed, 6 Jan 2016 16:31:24 -0200
Subject: [PATCH] Edita chunk setup.
---
cap06.Rmd | 25 +++----------------------
1 file changed, 3 insertions(+), 22 deletions(-)
diff --git a/cap06.Rmd b/cap06.Rmd
index 5dd92ed..f4bb2c5 100644
--- a/cap06.Rmd
+++ b/cap06.Rmd
@@ -4,33 +4,14 @@ author: "Fernando Mayer & Walmes Zeviani"
---
```{r setup, include=FALSE}
-library(knitr)
-
-opts_chunk$set(
- dev.args=list(family = "Palatino"))
-opts_knit$set(eval.after = "fig.cap")
-
-## http://stackoverflow.com/questions/13848137/figure-captions-references-using-knitr-and-markdown-to-html
-fig <- local({
- i <- 0
- ref <- list()
- list(
- cap = function(refName, text) {
- i <<- i + 1
- ref[[refName]] <<- i
- paste("Figura ", i, ": ", text, sep = "")
- },
- ref = function(refName) {
- ref[[refName]]
- })
-})
+## Carrega as definições de sessão.
+source("setup_knitr.R")
+source("config.R")
## Tipo de output necessário para saber como gerar os captions.
ishtml <- any(grepl(pattern = "^html_document",
x = readLines("_output.yaml")))
-options(width = 68)
-
## Carrega as definições de sessão.
source("config.R")
rty <- "md"
--
GitLab