Obg Rodrigo, era isso mesmo!<br /><br />
<hr style="border-top: 1px solid #ccc;" />
Em 29/06/2012 08:12, <strong>Rodrigo Coster < rcoster@gmail.com ></strong> escreveu:<br />É só salvar numa variável separada<br /><br />dados<-matrix(sample(1:4,27,replace=T),ncol=3)<br />dados<br /><br />#substituir x por y<br />x<-c(1,2)<br />y<-c(2,4)<br /><br />#substituição<br />dados2 <- dados<br />for (i in seq_along(dados)) { dados[dados2 == x[i]] <- y[i] }<br /><br />#final<br />dados2 # Dados originais<br />dados # Dados alterados<br /><br />
<div class="gmail_quote">2012/6/29 andrebvs <span dir="ltr"><<a href="http://mce_host/compose?to=andrebvs@bol.com.br" target="_blank">andrebvs@bol.com.br</a>></span><br />
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Bom dia Benilton!<br /><br />Na verdade é só substituir de uma vez, porque se for substituir de um por um, o que for atualizado, vai atualizar novamente. Mas o que estou querendo é o seguinte:<br /><br />Por exemplo:<br /><br />M=c(3,19,22,27,34,<br />3,12,22,34,43,<br />3,12,27,43,54,<br />12,19,27,34,43,<br />4,16,21,36,41,<br />4,9,16,30,41,<br />4,9,21,30,36,<br />9,16,21,36,41,<br />5,8,24,35,47,<br />5,15,24,38,52)<br /><br />Saída:
<div class="im"><br /><br />[1,] 3 19 22 27 34<br />[2,] 3 12 22 34 43<br />[3,] 3 12 27 43 54<br />[4,] 12 19 27 34 43<br />[5,] 4 16 21 36 41<br />[6,] 4 9 16 30 41<br />[7,] 4 9 21 30 36<br />[8,] 9 16 21 36 41<br />[9,] 5 8 24 35 47<br />[10,] 5 15 24 38 52<br /><br /></div>
Trocar onde tem v1 por v2:<br /><br />v1 < - c(9,11,12,15,18,19,21,22,23,24,27,30,32,35,36,39,41,46,52,54,55,56,57,58)<br />v2 <-c(10,12,13,14,17,23,24,25,28,29,30,32,33,36,37,41,42,44,51,52,53,54,59,60)<br /><br />Final desejado:<br /><br />[1,] 3 23 25 30 34<br />[2,] 3 13 25 34 43<br />[3,] 3 13 30 43 52<br />[4,] <a href="tel:13%20%C2%A0%C2%A0%2023%C2%A0%2030%20%C2%A0%2034%C2%A0%C2%A0%2043" target="_blank">13 23 30 34 43</a><br />[5,] 4 16 24 37 42<br />...<br /><br />[10,] 5 14 29 38 51<br /><br />É isso!<br /><br />
<hr style="border-top:1px solid #ccc" />
Em 28/06/2012 16:30, <strong>Augusto Ribas < <a href="http://mce_host/compose?to=ribas.aca@gmail.com" target="_blank">ribas.aca@gmail.com</a> ></strong> escreveu:
<div>
<div class="h5"><br />#exemplo<br />dados<-matrix(sample(1:4,9,replace=T),ncol=3,nrow=3)<br />dados<br /><br />#substituir x por y<br />x<-c(2,3)<br />y<-c(8,9)<br /><br />#substituição<br />for (i in seq_along(dados)) { dados[dados == x[i]] <- y[i] }<br /><br />#final<br />dados<br /><br />O que não funcionou?<br />Utiliza o comando dput(suamatriz) aqui dai da pra testar o exemplo nela.<br /><br />E uma pergunta, vc quer trocar 11 por 12 e depois 12 por 13, ou seja<br />na matriz final vai ficar onde era 11 e 12 um 13<br />ou so trocar uma vez?<br />se vc tem :<br />11 11<br />12 12<br /><br /><br />vc quer<br />13 13<br />13 13<br /><br />ou<br />12 12<br />13 13<br />?<br /><br /><br /></div>
</div>
Em 28 de junho de 2012 14:46, andrebvs escreveu:
<div class="im"><br />> Obg Benilton, mas o script não funcionou!<br />><br />><br />> ________________________________</div>
> Em 28/06/2012 15:02, Beni lton Carvalho < <a href="http://mce_host/compose?to=beniltoncarvalho@gmail.com" target="_blank">beniltoncarvalho@gmail.com</a> >
<div class="im"><br />> escreveu:<br />><br />> for (i in seq_along(valores_atuais))<br />> matriz[matriz == valores_na_matriz[i]] = valores_atuais[i]<br />><br />><br />> b<br />><br />> 2012/6/28 andrebvs :<br />><br />>> Como atualizo alguns dos seguintes valores da matriz abaixo:<br />>><br />>> [,1] [,2] [,3] [,4] [,5]<br />>> [1,] 3 19 22 27 34<br />>> [2,] 3 12 22 34 43<br />>> [3,] 3 12 27 43 54<br />>> [4,] 12 19 27 34 43<br />>> [5,] 4 16 21 36 41<br />>> [6,] 4 9 16 30 41<br />>> [7,] 4 9 21 30 36<br />>> [8,] 9 16 21 36 41<br />>> [9,] 5 8 24 35 47<br />>> [10,] 5 15 24 38 52</div>
>> [11,] 5Â � 8 15 35 38
<div class="HOEnZb">
<div class="h5"><br />>> [12,] 8 15 24 38 Â 52<br />><br />>> [13,] 7 11 23 39 46<br />>> [14,] 7 18 32 46 49<br />>> [15,] 7 11 18 23 39<br />>> [16,] 11 18 32 39 46<br />>> [17,] 3 16 23 35 54<br />>> [18,] 3 5 16 36 46<br />>> [19,] 3 5 23 35 46<br />>> [20,] 5 16 35 36 54<br />>> [21,] 4 7 22 30 47<br />>> [22,] 4 22 24 30 34<br />>> [23,] 4 7 24 34 47<br />>> [24,] 7 22 24 34 49<br />>> [25,] 8 19 21 32 43<br />>> [26,] 8 11 21 38 43<br />>> [27,] 8 19 32 38 50<br />>> [28,] 11 19 21 32 43<br /
>>> [29,] 9 12 18 39 41<br />>> [30,] 9 15 27 39 52<br />>> [31,] 9 12 15 18Â � 27<br />><br />>> [32,] 12 18 27 39 41<br />>> [33,] 3 15 21 35 39<br />>> [34,] 3 4 21 22 39<br />>> [35,] 3 15 22 35 47<br />>> [36,] 4 15 21 22 39<br />>> [37,] 5 7 19 38 46<br />>> [38,] 5 19 27 38 54<br />>> [39,] 5 7 23 27 46<br />>> [40,] 7 23 27 38 46<br />>><br />>> Os valores a serem atualizados (sbstituídos) da matriz são:<br />>><br />>> valores_na_matriz <-<br />>> c(9,11,12,15,18,19,21,22,23,24,27,30,32,35,36,39,41,46,52,54,55,56,57,58)<br />>><br />>> Pelos correspondentes valores abai xo:<br />&g
t;><br />>> valores_atuais <-<br />>> c(10,12,13,14,17,23,24,25,28,29,30,32,33,36,37,41,42,44,51,52,53,54,59,60)<br />>><br />>> ou seja, substituir na: 9 por 10, 11 por 12, 12 poe 13, ..., 58 por 60.<br />>><br />>> desde já agradeço!<br />>><br />>> Att.<br />>> André<br />>><br />>><br />>> _______________________________________________<br />>> R-br mailing list<br />>> <a href="http://mce_host/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br />>> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br />>> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça<br />>> código<br />>> mínimo reproduzível.<br />> ______________________________________
_________<br />> R-br mailing list<br />> R-br@listas.c3sl.ufpr.b r<br />> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br />> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código<br />> mínimo reproduzível.<br />><br />><br />> _______________________________________________<br />> R-br mailing list<br />> <a href="http://mce_host/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br />> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br />> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código<br />> mínimo reproduzível.<br /><br /><br /
><br />-- <br />Grato<br />Augusto C. A. Ribas<br /><br />Site Pessoal: <a href="http://augustoribas.heliohost.org" target="_blank">http://augustoribas.he liohost.org</a><br />Lattes: <a href="http://lattes.cnpq.br/7355685961127056" target="_blank">http://lattes.cnpq.br/7355685961127056</a><br />_______________________________________________<br />R-br mailing list<br /><a href="http://mce_host/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br /><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br />Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</div>
</div>
<br />_______________________________________________<br />R-br mailing list<br /><a href="http://mce_host/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br /><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br />Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br /></blockquote>
</div>
<br /><br />