<div>Olá chará!</div>
<div> </div>
<div>Acredito que seu problema seje resolvido com as seguintes linhas de comandos:</div>
<div><br /><strong># Seus supostos dados:</strong><br /><br />   dados <- c(143,151,151,159,160,161,162,163,164,164,165,165,166,166,167,167,<br />                 168,169,169,169,170,170,171,172,173,173,173,173,174,174,174,174,<br />                 175,176,177,178,179,180,181,182,182,182,183,184,185,186,187,188,<br />                 189,190,191)<br />  <br /><strong># Histograma das frequências absolutas:</strong><br /><br />   par(mfrow=c(1,2))<br />   Hfi = hist(dados,nclass=6,col="gray",xlab="Classes",ylab="Frequência absoluta",main="Histograma") <br />   lines(c(min(Hfi$breaks),Hfi$mids,max(Hfi$breaks)),c(0,Hfi$counts,0),type="l")<br /><br /><strong># Histograma das frequências acumuladas:</strong><br /><br />   cumhist <- function(dados, plot=TRUE, ...)<br />    {<br />      h <- hist(dados, plot=FALSE, ...)<br />      h$counts <- cumsum(h$counts)<br />      h$density <- cumsum(h$density
 )<br />      h$itensities <- cumsum(h$itensities)<br /><br />       if(plot)<br />       plot(h,col="gray",xlab="Classes",ylab="Frequência acumulada",main="Ogiva")<br />       h<br />   }<br /> <br />   Hfa <- cumhist(dados,nclass=6)<br />   lines(c(min(Hfa$breaks),Hfa$mids,max(Hfa$breaks)),c(0,Hfa$counts,0),type="l")<br /> <br /><em><strong>Att.</strong></em><br /><em><strong>André Barbosa Ventura da Silva</strong></em></div>
<div> </div>
<hr style="border-top: 1px solid #ccc;" />
<div>Em 24/09/2012 16:16, <strong>Andre Oliveira < andreolsouza@yahoo.com.br ></strong> escreveu:</div>
<div style="color: #000; background-color: #fff; font-family: arial, helvetica, sans-serif; font-size: 10pt;">
<div><span>Construir  2 códigos bem simples....</span></div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"> </div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"><span> </span></div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"><span> f=c(0,2,11,18,10,9)# Frequencias absolutas <br />names(f)=c("147","155","163","171","179","187") # Pontos médios das classes <br />barplot(f,space=0,xlab="Classes", ylab="Frequência absoluta",main="Histograma") # Histograma <br /></span></div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"> </div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"><span> </span></div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"> </div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"><span>fa=c(0,2,13,31,41,50) # Frequencia acumulada <br />names(fa)=c("147","155","163","171","179","187") # Pontos médios das classes <br />barplot(fa,space=0,xlab="Classes", ylab="Frequência acumulada",main="Ogiva")</span></div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"> </div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"> </div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"><span>Gostaria de colocar uma linha unido os pontos médio dos topos do retângulos. Tentei <span style="font-weight: bold;">points</span> mas não consegui. Se alguem puder ajudar ficarei agradecido.</span></div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"> </div>
<div style="color: #000000; font-size: 13.3333px; font-family: arial,helvetica,sans-serif; background-color: transparent; font-style: normal;"> </div>
<div> </div>
<div>André Oliveira Souza</div>
</div>
<div> </div>
<div> </div>