<div>
<div>Olá chará!</div>
<div> </div>
<div>Acredito que seu problema seje resolvido com as seguintes linhas de comandos:</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 <- c
 umsum(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><br /> <br /><br /></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>