<div><strong>Olá colegas!</strong></div>
<div> </div>
<div><strong>Voltando ao assunto de vetores, é o seguinte:<br /><br />Dada a matrix a seguir:</strong> </div>
<div> </div>
<div> [,1] [,2] [,3] [,4]<br /> [1,] 1 2 4 5<br /> [2,] 1 2 5 7<br /> [3,] 1 3 5 9<br /> [4,] 1 2 5 6<br /> [5,] 1 2 4 5<br /> [6,] 1 2 5 9<br /> [7,] 1 2 3 5<br /> [8,] 1 2 3 5<br /> [9,] 1 3 5 9<br />[10,] 1 2 5 6<br />[11,] 1 2 3 4<br />[12,] 1 3 5 5</div>
<div> </div>
<div><strong># Como obter essa saída abaixo, indicando por exemplo, que as linhas 1 e 5 da matrix acima são iguais, depois que a 3 e 9 são iguais, ..., a # 7 e 8 são iguais.</strong><br /><br />[1,] 1 5<br />[2,] 3 9<br />[3,] 4 10<br />[4,] 7 8</div>
<div> </div>
<div><strong># Eu até fiz uma rotina, mas não obtenho o resultado correto, vejam:</strong><br /><br />L1 <- c(1,2,4,5)<br />L2 <- c(7,2,1,5)<br />L3 <- c(9,3,1,5)<br />L4 <- c(6,2,1,5)<br />L5 <- c(5,2,1,4)<br />L6 <- c(9,2,1,5)<br />L7 <- c(3,2,1,5)<br />L8 <- c(1,2,3,5)<br />L9 <- c(9,3,1,5)<br />L10 <- c(6,2,1,5)<br />L11 <- c(1,2,3,4)<br />L12 <- c(5,3,1,5)<br /><br />M = matrix(c(L1,L2,L3,L4,L5,L6,L7,L8,L9,L10,L11,L12),,4,byrow=T)<br />T <- duplicated(t(apply(M,1,sort)),fromLast=TRUE)|duplicated(t(apply(M,1,sort)),fromLast=FALSE)<br />matrix(which(T),,2)</div>
<div> </div>
<div><strong># Saida não desejada do R:</strong></div>
<div><strong> </strong></div>
<div> [1,] 1 7<br /> [2,] 3 8<br /> [3,] 4 9<br /> [4,] 5 10<br /><br /></div>
<div> desde já agradeço!<br /><br /><em>Att.</em><br /><em>André</em><br /><br /></div>
<hr style="border-top: 1px solid #ccc;" />
<div>Em 15/03/2013 00:01, <strong>Benilton Carvalho < beniltoncarvalho@gmail.com ></strong> escreveu:</div>
<p dir="ltr">Tudo em uma linha só</p>
<div class="gmail_quote">On Mar 15, 2013 12:00 AM, "Benilton Carvalho" <<a href="../../../undefined//compose?to=beniltoncarvalho@gmail.com" target="_blank">beniltoncarvalho@gmail.com</a>> wrote:<br />
<blockquote class="gmail_quote" style="margin: 0 0 0 .8ex; border-left: 1px #ccc solid; padding-left: 1ex;">
<p dir="ltr">duplicated(t(apply(x, 1, sort)), fromLast=FALSE) | duplicated(t(apply(x, 1, sort)), fromLast=TRUE)</p>
<div class="gmail_quote">On Mar 14, 2013 11:50 PM, <<a href="../../../undefined//compose?to=andrebvs@bol.com.br" target="_blank">andrebvs@bol.com.br</a>> wrote:<br />
<blockquote class="gmail_quote" style="margin: 0 0 0 .8ex; border-left: 1px #ccc solid; padding-left: 1ex;">
<div>Obrigado benilton, tinha acabado de utilizar esse simples comando mesmo:<br /><br />L1 L2 L3 L4 L5 L6 <br />M = matrix(c(L1,L2,L3,L4,L5,L6),,4,byrow=T)<br /><br />unique(t(apply(M,1,sort)))<br /><br />Agora, teria como verificar, por exemplo, quais linhas foram repetidas na matrix M?</div>
<div> <br /><em>Att.</em><br /><em>André</em><br /><br /></div>
<hr style="border-top: 1px solid #ccc;" />
<div>Em 14/03/2013 23:46, <strong>Benilton Carvalho < <a href="../../../undefined//compose?to=beniltoncarvalho@gmail.com" target="_blank">beniltoncarvalho@gmail.com</a> ></strong> escreveu:</div>
<p dir="ltr">unique(t(apply(x, 1, sort)))</p>
<div class="gmail_quote">On Mar 14, 2013 11:36 PM, <<a href="http://../../../undefined/compose?to=andrebvs@bol.com.br" target="_blank">andrebvs@bol.com.br</a>> wrote:<br />
<blockquote class="gmail_quote" style="margin: 0 0 0 .8ex; border-left: 1px #ccc solid; padding-left: 1ex;">
<div>Olá Benilton!<br /><br />No resultado final, tanto faz, ter linha ordenada ou não.<br /><br /></div>
<hr style="border-top: 1px solid #ccc;" />
<div>Em 14/03/2013 23:35, <strong>Benilton Carvalho < <a href="http://../../../undefined/compose?to=beniltoncarvalho@gmail.com" target="_blank">beniltoncarvalho@gmail.com</a> ></strong> escreveu:</div>
<p dir="ltr">As linhas 1 e 5 só são iguais depois de ordenar. Correto? Seu objeto final pode ter as linhas ordenadas?</p>
<div class="gmail_quote">On Mar 14, 2013 11:19 PM, <<a href="http://../../../undefined/compose?to=andrebvs@bol.com.br" target="_blank">andrebvs@bol.com.br</a>> wrote:<br />
<blockquote class="gmail_quote" style="margin: 0 0 0 .8ex; border-left: 1px #ccc solid; padding-left: 1ex;">
<div>Olá colegas!</div>
<div>
<div>Gostaria de saber como posso eliminar de uma matrix vetores repetidos, no exemplo abaixo, a linha1 e a linha5 são iguais, gostaria que houvesse uma outra matrix ou dataframe com apenas as linhas não repetidas.</div>
<div> </div>
<div>Seja a matrix 6x4:</div>
<div> </div>
<div>linha1
<div>linha2
<div>
<div>linha3linha4
<div>
<div>linha5linha6
<div> </div>
<div>desde já agradeço!<br /><br /></div>
<div><em>Att.</em><br /><em>André</em></div>
</div>
<br />_______________________________________________<br /> R-br mailing list<br /> <a href="http://../../../undefined/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>
</div>
</div>
</div>
</div>
</blockquote>
</div>
<div> </div>
<br />_______________________________________________<br /> R-br mailing list<br /> <a href="http://../../../undefined/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.</blockquote>
</div>
<div> </div>
<br />_______________________________________________<br /> R-br mailing list<br /> <a href="../../../undefined//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.</blockquote>
</div>
</blockquote>
</div>
<div> </div>