<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<div class="moz-cite-prefix">Andre,<br>
<br>
vi a pouco na lista do ggplot2 um script que pode ser o que voce
procura.<br>
<br>
# d is a data frame with 4 columns<br>
# d$x gives variable names<br>
# d$y gives center point<br>
# d$ylo gives lower limits<br>
# d$yhi gives upper limits<br>
forestplot <- function(d, xlab="Odds Ratio", ylab="Study"){<br>
require(ggplot2)<br>
p <- ggplot(d, aes(x=x, y=y, ymin=ylo, ymax=yhi)) +<br>
geom_pointrange() +<br>
coord_flip() +<br>
geom_hline(aes(x=0), lty=2) +<br>
ylab(xlab) +<br>
xlab(ylab) #switch because of the coord_flip() above<br>
return(p)<br>
}<br>
<br>
# Create some dummy data.<br>
d <- data.frame(x = toupper(letters[1:10]),<br>
y = rnorm(10, .05, 0.1))<br>
d <- transform(d, ylo = y-1/10, yhi=y+1/10)<br>
<br>
forestplot(d)<br>
<br>
<pre class="moz-signature" cols="72">[]s
Leonard de Assis
assis <dot> leonard <at> gmail <dot> com
</pre>
Em 24/10/2012 23:55, andrebvs escreveu:<br>
</div>
<blockquote cite="mid:50889c0bc6772_1ce695b9c7c3cf@a4-winter4.tmail"
type="cite">
<div>Olá Humberto!</div>
<div> </div>
<div>Eu até começei a fazer o que estava querendo, porém, não
consegui implementar os intervalos de confianças com as
respectivas médias. Segue um script abaixo até onde cheguei, se
alguém puder continuar e sanar sua dúvida, seria uma grande
ajuda!</div>
<div><br>
library(fields)<br>
plot(xlim=c(0,1.8),5:10, bty='n',type="n",axes=F,xlab="Relative
catchability",ylab="")<br>
x <- seq(0.0,1.8,by=0.2)<br>
y <- seq(5,14)<br>
u <- 1<br>
v <- 50<br>
<br>
axis(1,lwd=2,at = x,labels = formatC(x, format="fg"))<br>
abline(v = 1, col = "black",lty=1,lwd=2)<br>
arrow.plot(x[6],y[6],v,u,arrow.ex=.4, length=.2, col='black',
lwd=2) <br>
arrow.plot(x[6],y[6],u-360,v-45,arrow.ex=.5, length=.2,
col='black', lwd=2) <br>
<br>
text(0,7,"Bigeye\nYellowfin
tuna\nAlbacore\nSwordfish\nSailfish\nWhite marlim\nBlue
marlim\nBlue shark\nCrocodile shark\nPelagic stingray\nTurtle
oliva\nOceanic whitetip shark",cex = 0.8,adj=c(0,0))</div>
<div><br>
text(1.1,5,"Species\nBigeye tuna\nYellowfin
tuna\nAlbacore\nSwordfish\nSailfish\nWhite marlim\nBlue
marlim\nBlue shark\nCrocodile shark\nPelagic stingray\nTurtle
oliva\nOceanic whitetip shark",cex = 0.8,adj=c(0,0))<br>
<br>
<br>
</div>
<div><em>Att.</em></div>
<div><em>André Barbosa Ventura da Silva</em></div>
<div> </div>
<div> </div>
<hr style="border-top: 1px solid #ccc;">
<div>Em 24/10/2012 20:38, <strong>Ivan Bezerra Allaman <
<a class="moz-txt-link-abbreviated" href="mailto:ivanalaman@yahoo.com.br">ivanalaman@yahoo.com.br</a> ></strong> escreveu:</div>
<div style="color: #000; background-color: #fff; font-family:
arial, helvetica, sans-serif; font-size: 12pt;">
<div><span>Utilize as funções plot, segments e par para obter
êxito! O link abaixo será útil também.</span></div>
<div style="color: #000000; font-size: 16px; font-family:
arial,helvetica,sans-serif; background-color: transparent;
font-style: normal;"> </div>
<div style="color: #000000; font-size: 16px; font-family:
arial,helvetica,sans-serif; background-color: transparent;
font-style: normal;"><span><a moz-do-not-send="true"
href="http://gallery.r-enthusiasts.com/" target="_blank">http://gallery.r-enthusiasts.com/</a><br>
</span></div>
<div style="color: #000000; font-size: 16px; font-family:
arial,helvetica,sans-serif; background-color: transparent;
font-style: normal;"> </div>
<div style="color: #000000; font-size: 16px; font-family:
arial,helvetica,sans-serif; background-color: transparent;
font-style: normal;"><span>(S,f,P)<br>
</span></div>
<div><span>Allaman</span></div>
<div> </div>
<div style="background-color: transparent;" align="center"><span
style="background-color: transparent; font-family: comic
sans ms; font-size: small;"><span style="font-size:
xx-small;"><strong> </strong></span></span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span style="background-color: transparent;"><span
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">\begin{signature}</span></span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span style="background-color: transparent;"><span
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;"><<>>=</span></span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span class="Apple-style-span"
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">Prof. Dr. Ivan Bezerra Allaman</span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span class="Apple-style-span"
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">Universidade Estadual de Santa Cruz</span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span class="Apple-style-span"
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">Departamento de Ciências Exatas e
Tecnológicas</span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span class="Apple-style-span"
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">Ilhéus/BA - Brasil</span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span class="Apple-style-span"
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">Fone: +55 73 3680-5596</span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span class="Apple-style-span"
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">E-mail:
<a class="moz-txt-link-abbreviated" href="mailto:ivanalaman@yahoo.com.br/ivanalaman@gmail.com">ivanalaman@yahoo.com.br/ivanalaman@gmail.com</a></span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span style="background-color: transparent;"><span
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">@</span></span></div>
<div style="text-align: left; background-color: transparent;"
align="center"><span style="background-color: transparent;"><span
style="font-family: courier,monaco,monospace,sans-serif;
font-size: small;">\end{signature}</span></span></div>
</div>
<div> </div>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<br>
<pre wrap="">_______________________________________________
R-br mailing list
<a class="moz-txt-link-abbreviated" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<a class="moz-txt-link-freetext" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a class="moz-txt-link-freetext" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</pre>
</blockquote>
<br>
</body>
</html>