No caso, o loop que criei foi esse<br><br><br><br>for (i in stn) { <br>        png(paste('figurateste',i,'.png',sep=''),width=1000,height=1000)<br><br>    par(mfrow=c(2,1))    <br>    tst <- subset(dados, (dados$fct_mrun==0) & (dados$fct_station_no==i) & (dados$frange ==0) )<br>
    attach(tst)<br>        <br>    tit.obs<- paste("Histograma Estacao:", i, "Observacao")<br>    tit.fct<- paste("Histograma Estacao:", i, "prev = ", 0)<br>    ifelse(!<a href="http://is.na">is.na</a>(tst$obs_clcl),hist(tst$obs_clcl,main=tit.obs),message("sem grafico"))<br>
    ifelse(!<a href="http://is.na">is.na</a>(tst$obs_clcl),hist(tst$fct_clcl,main=tit.fct),message("sem grafico"))<br>dev.off()<br>}<br><br> <br><br><br><br><div class="gmail_quote">Em 25 de maio de 2011 08:37, Victor Eduardo <span dir="ltr"><<a href="mailto:victorduca08@gmail.com">victorduca08@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">Qual o problema com esse erro?<br><br><div class="gmail_quote">Em 24 de maio de 2011 16:04, Victor Eduardo <span dir="ltr"><<a href="mailto:victorduca08@gmail.com" target="_blank">victorduca08@gmail.com</a>></span> escreveu:<div>
<div></div><div class="h5"><br><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">
Galera, estou com um banco de dados que tem várias estações, e preciso criar histograma para cada estação, então criei um loop para criar histograma para cada estacao, sendo que algumas estações que eu pego da o seguinte erro quando eu uso o comando abaixo:<br>


<br>ifelse(length(na.omit(obs_clcl))>=1,hist(obs_clcl,main=tit.obs),message("sem grafico"))<br><br><br>Erro em ans[!test & !nas] <- rep(no, length.out = length(ans))[!test &  : <br>  substituto tem comprimento zero<br>


<br>O grande problema é que o loop trava quando aparece esse erro e simplesmente acaba. <br><br><br>Abraços,<br><font color="#888888"><br><br>Victor Eduardo<br>
</font></blockquote></div></div></div><br>
</blockquote></div><br>