From 98994b9b459acc13c407b4a47e823a66db412be5 Mon Sep 17 00:00:00 2001
From: Eduardo Junior <edujrrib@gmail.com>
Date: Wed, 8 Jun 2016 18:33:54 -0300
Subject: [PATCH] Padroniza etiquetas dos eixos na horizontal
---
docs/cap02_revisao-de-literatura.Rnw | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/docs/cap02_revisao-de-literatura.Rnw b/docs/cap02_revisao-de-literatura.Rnw
index 74d94b2..83d8680 100644
--- a/docs/cap02_revisao-de-literatura.Rnw
+++ b/docs/cap02_revisao-de-literatura.Rnw
@@ -385,7 +385,7 @@ labels <- substitute(
## Gráfico
## Curva identidade representando a Poisson
-par(mar = c(5.5, 4.2, 3, 3))
+par(mar = c(5.5, 4.2, 3, 3), las = 1)
curve(mu + 1*0,
from = 0, to = 10, xname = "mu",
ylab = expression(V(Y) == mu + mu^2~"/"~phi),
@@ -606,7 +606,7 @@ fl <- substitute(
xyplot(values ~ c(y - 0.15) | ind, data = da,
type = c("h", "g"),
xlab = "y", ylab = expression(P(Y == y)),
- scales = list(relation = "free"),
+ scales = list(relation = "free", rot = 0),
layout = c(NA, 1),
par.strip = list(lines = 2, col = "transparent"),
sub = "Fonte: Elaborado pelo autor.")
@@ -674,7 +674,7 @@ labels <- substitute(
##-------------------------------------------
## Gráfico
-par(mar = c(6.5, 5, 3, 3) + 0.1)
+par(mar = c(6.5, 5, 3, 3) + 0.1, las = 1)
## Curva identidade representando a Poisson
curve((1/1)*(mu + (1 - 1)/(2*1)), xlab = "", ylab = "",
from = 0, to = 10, xname = "mu")
--
GitLab