<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>Alison, da uma olhada se os códigos abaixo resolvem.<BR> <BR>c1<-read.table("clima1") <BR>c2 <-read.table("clima2")<BR> <BR>for(k in 1:(ncol(c1)-3)){<br>    for(i in 1:nrow(c1)){<br>         for(j in 1:nrow(c2)){        <br>            if(c1[i,1]==c2[j,1] & c1[i,3]==c2[j,3] & is.na(c1[i,(k+3)])){<br>            c1[i,(k+3)]<-c2[j,(k+3)] <br>            break                                  <br>            }          <br>         }                      <br>     }<br>}<BR> <BR>Att.<BR> <BR>Tiago.<br><br><BR><div>#################################################################</div><div> </div><div>Tiago de Souza Marçal - Graduando em Agronomia pelo CCA-UFES</div><div> </div><div>Bolsista de Iniciação Científica da área de Genética e Melhoramento de Plantas</div><div> </div><div>################################################################# </div><br> <BR><div><hr id="stopSpelling">Date: Thu, 17 Oct 2013 17:07:19 -0700<br>From: alissonluc@yahoo.com.br<br>To: r-br@listas.c3sl.ufpr.br<br>Subject: Re: [R-br] Substituir NA em data.frame 1 por dados data.frame 2<br><br><div style="color: rgb(0, 0, 0); font-family: HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif; font-size: 10pt; background-color: rgb(255, 255, 255);"><div><span>Segue recorte das data.frame 1 (normais.clima) e 2 (inmet.mensal).</span></div><div style='color: rgb(0, 0, 0); font-family: HelveticaNeue, "Helvetica Neue", Helvetica, Arial, "Lucida Grande", sans-serif; font-size: 13.6px; font-style: normal; background-color: transparent;'><span><br></span></div><div style='color: rgb(0, 0, 0); font-family: HelveticaNeue, "Helvetica Neue", Helvetica, Arial, "Lucida Grande", sans-serif; font-size: 13.6px; font-style: normal; background-color: transparent;'><span>Obrigado.</span></div><div></div><div> </div><div><font face="times new roman, new york, times, serif">Alisson Lucrécio da Costa</font></div><div class="ecxyahoo_quoted" style="display: block;"> <br> <br> <div style='font-family: HelveticaNeue, "Helvetica Neue", Helvetica, Arial, "Lucida Grande", sans-serif; font-size: 10pt;'> <div style='font-family: HelveticaNeue, "Helvetica Neue", Helvetica, Arial, "Lucida Grande", sans-serif; font-size: 12pt;'> <div dir="ltr"> <font face="Arial" size="2"> On Thursday, October 17, 2013 8:54 PM, Tiago Souza Marçal <tiagosouzamarcal@hotmail.com> wrote:<br> </font> </div>  <div class="ecxy_msg_container"><div id="ecxyiv1912492930"><style><!--
.ExternalClass #ecxyiv1912492930 body.ecxyiv1912492930hmmessage {
font-size:12pt;
font-family:Calibri;
}
--></style><div><div dir="ltr">Envie um CMR para podermos ajuda-lo.<br clear="none"> <br clear="none">att.<br clear="none"> <br clear="none">Tiago.<br clear="none"><br clear="none"><br clear="none"><div>#################################################################</div><div> </div><div>Tiago de Souza Marçal - Graduando em Agronomia pelo CCA-UFES</div><div> </div><div>Bolsista de Iniciação Científica da área de Genética e Melhoramento de Plantas</div><div> </div><div>################################################################# </div><br clear="none"> <br clear="none"><div><hr id="ecxyiv1912492930stopSpelling">Date: Thu, 17 Oct 2013 16:34:44 -0700<br clear="none">From: alissonluc@yahoo.com.br<br clear="none">To: r-br@listas.c3sl.ufpr.br<br clear="none">Subject: [R-br] Substituir NA em data.frame 1 por dados data.frame 2<br clear="none"><br clear="none"><div class="ecxyiv1912492930yqt7484958114" id="ecxyiv1912492930yqt89735"><div style='color: rgb(0, 0, 0); font-family: HelveticaNeue, "Helvetica Neue", Helvetica, Arial, "Lucida Grande", sans-serif; font-size: 10pt; background-color: rgb(255, 255, 255);'><div>Caro Colegas da r-br,</div><div><br clear="none"></div><div style="color: rgb(0, 0, 0); font-family: HelveticaNeue,;">Boa noite.</div><div style="color: rgb(0, 0, 0); font-family: HelveticaNeue,;"><br clear="none"></div><div style="color: rgb(0, 0, 0); font-family: HelveticaNeue,;">Eu tenho 2 data.frame, uma com dados originais publicado e outra como dados gerados a partir de
 dados de estação climatológicas do Brasil. A primeira data.frame tem alguns NA, os quais preciso substituir pelos valores calculado, assim preciso fazer uma função que encontre o valor e substitua pelo valor na data.frame 2, entretanto essas duas data.frame não tem e numero de linha e ordem.</div><div style="color: rgb(0, 0, 0); font-family: HelveticaNeue,;"><br clear="none"></div><div style="color: rgb(0, 0, 0); font-family: HelveticaNeue,;">Obrigado.</div><div></div><div> </div><div><font face="times new roman, new york, times, serif">Alisson Lucrécio da Costa</font></div></div></div><br clear="none">_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forne�a c�digo m�nimo reproduz�vel.</div>                                      </div></div></div><br><div class="ecxyqt7484958114" id="ecxyqt41207">_______________________________________________<br clear="none">R-br mailing list<br clear="none"><a href="mailto:R-br@listas.c3sl.ufpr.br" shape="rect">R-br@listas.c3sl.ufpr.br</a><br clear="none"><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank" shape="rect">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br clear="none">Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank" shape="rect">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</div><br><br></div>  </div> </div>  </div> </div><br>_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forne�a c�digo m�nimo reproduz�vel.</div>                                      </div></body>
</html>