From 2d622dc9986a5455bfedeb5b1e46c25972891b98 Mon Sep 17 00:00:00 2001
From: Eduardo Junior <edujrrib@gmail.com>
Date: Sat, 4 Jun 2016 13:43:35 -0300
Subject: [PATCH] =?UTF-8?q?Modifica=20cores=20e=20op=C3=A7=C3=B5es=20do=20?=
=?UTF-8?q?knitr=20e=20gr=C3=A1ficos=20lattice?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
---
docs/_setup.R | 10 ++++------
1 file changed, 4 insertions(+), 6 deletions(-)
diff --git a/docs/_setup.R b/docs/_setup.R
index 4037b4c..270a1b8 100644
--- a/docs/_setup.R
+++ b/docs/_setup.R
@@ -1,18 +1,17 @@
library(knitr)
opts_chunk$set(
- warning = FALSE,
+ warning = FALSE,
message = FALSE,
echo = FALSE,
- tidy = FALSE,
+ tidy = TRUE,
fig.width = 7,
fig.height = 5,
fig.align = "center",
- dpi = 100,
dev.args = list(family = "Palatino"))
## Configura opções de gráficos do knitr
library(latticeExtra)
-mycol <- c("#E41A1C", "#377EB8", "#4DAF4A",
+mycol <- c("#377EB8", "#E41A1C", "#4DAF4A",
"#ff00ff", "#FF7F00", "#984EA3", "#FFFF33")
## Trellis graphical style.
@@ -28,7 +27,7 @@ ps <- list(
superpose.line = list(col = mycol, lty = 1),
superpose.symbol = list(col = mycol, pch = 1),
superpose.polygon = list(col = mycol),
- strip.background = list(col = c("gray80", "gray50")))
+ strip.background = list(col = c("gray90", "gray70")))
trellis.par.set(ps)
## Configura opções de output no documento
@@ -36,4 +35,3 @@ options(digits = 3, OutDec = ",",
xtable.caption.placement = "top",
xtable.include.rownames = FALSE,
xtable.booktabs = TRUE)
-
--
GitLab