<div>Olha aqui um exemplo com MDS</div><div>Vc tira a informação de onde vai os pontos ai pode mudar tudo que quiser, cor, tipo de símbolo ou tamanho.</div><div>Aqui, pequei uma matriz de distancia que de exemplo, fiz o mds dai tirei os valores e plotei com 2 símbolos diferentes.</div>
<div>Pro biplot dai vc teria que ainda tirar as setinhas e plotar elas com o comando arrows.</div><div>É mais ou menos isso não?</div><div><br></div><div>Tirei o exemplo desse site e dei uma adaptada pra ser símbolos no comando plot</div>
<div><a href="http://www.statmethods.net/advstats/mds.html">http://www.statmethods.net/advstats/mds.html</a></div><div><br></div><div><br></div><div>require(graphics)</div><div>fit<-cmdscale(eurodist,k=2)</div><div>resultados</div>
<div>fit </div><div><br></div><div>#Plotando a solução</div><div>#extraindo os valores</div><div>x <- fit[,1]</div><div>y <- fit[,2]</div><div>#plotando, olha o pch la</div><div>plot(x,y,xlab="Coordenadas 1",ylab="Coordenadas 2",main="MDS",type="p",pch=c(rep(c(19,1),ech=10),1),cex=1.5)</div>
<div><br></div><div><br></div><br><div class="gmail_quote">Em 8 de abril de 2011 13:01, Marcelo Claro de Souza <span dir="ltr"><<a href="mailto:marcelo_claro@yahoo.com.br">marcelo_claro@yahoo.com.br</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><table cellspacing="0" cellpadding="0" border="0"><tbody><tr><td valign="top" style="font:inherit">Olá, infelizmente não deu certo. Continua aparecendo o nome da linha na figura ao invés de aparecer os símbolos.<br>
Eu tentei os comandos sugeridos tanto p biplot quanto p plot e mesmo assim não deu certo.<br>Tem alguma outra forma que eu possa tentar?<br>Em anexo segue o conjunto de dados que estou utilizando para vcs fazerem alguns testes.<div class="im">
<br>Muito obrigado.<br><br><div style="text-align:left"><font size="4"><span style="color:rgb(0, 0, 255)">Marcelo Claro de Souza</span></font><br></div><div><font size="1">Biólogo, Doutorando em Biologia Vegetal, Depto. de botânica, IBRC- UNESP.</font></div>
<div><font size="1">16 - 91914780</font><br><span style="font-size:10pt"><a rel="nofollow" href="http://lattes.cnpq.br/5691388412841376" target="_blank">http://lattes.cnpq.br/5691388412841376</a></span> </div><br><br></div>
--- Em <b>sex, 8/4/11, Walmes Zeviani <i><<a href="mailto:walmeszeviani@gmail.com" target="_blank">walmeszeviani@gmail.com</a>></i></b> escreveu:<br><blockquote style="border-left:2px solid rgb(16, 16, 255);margin-left:5px;padding-left:5px">
<div class="im"><br>De: Walmes Zeviani <<a href="mailto:walmeszeviani@gmail.com" target="_blank">walmeszeviani@gmail.com</a>><br>Assunto: Re: [R-br] Simbolos pré-definidos em função das linhas de uma tabela<br>Para: <a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a><br>
</div>Data: Sexta-feira, 8 de Abril de 2011, 0:42<div><div></div><div class="h5"><br><br><div><font face="trebuchet ms,sans-serif">Marcelo,<br><br>Seria isso<br><br></font><span style="font-family:courier new,monospace">biplot(dados.pca, xlab="pc1", ylab="pc2", pch=rep(c(19,1,2), each=6))</span><br>
<br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">Espero que dê certo.</span><br style="font-family:trebuchet ms,sans-serif"><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">À disposição.</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">Walmes.</span><br style="font-family:trebuchet ms,sans-serif">
<div style="font-family:trebuchet ms,sans-serif"></div><br style="font-family:trebuchet ms,sans-serif" clear="all"><span style="font-family:trebuchet ms,sans-serif">==========================================================================</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">Walmes Marques Zeviani</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">Departamento de Estatística - Universidade Federal do Paraná</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">fone: (+55) 41 3361 3573</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">VoIP: (3361 3600) 1053 1173</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">e-mail: <a rel="nofollow" href="http://mc/compose?to=walmes@ufpr.br" target="_blank">walmes@ufpr.br</a></span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">twitter: @walmeszeviani</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">homepage: <a rel="nofollow" href="http://www.leg.ufpr.br/%7Ewalmes" target="_blank">http://www.leg.ufpr.br/~walmes</a></span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">linux user number: 531218</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">==========================================================================</span><br>
<br><br><div>Em 7 de abril de 2011 23:12, Augusto Ribas <span dir="ltr"><<a rel="nofollow" href="http://mc/compose?to=ribas.aca@gmail.com" target="_blank">ribas.aca@gmail.com</a>></span> escreveu:<br><blockquote style="margin:0pt 0pt 0pt 0.8ex;border-left:1px solid rgb(204, 204, 204);padding-left:1ex">
<div>Tipo, um numero corresponde um simbulo.</div>
<div>Por exemplo 19 é bolinha preta fechada</div>
<div>1 é bolinha com contorno preto e interior branco.</div>
<div> </div>
<div>digita ?pch ou ?points que vai ter uma parte que fala qual numero faz cada simbulo.</div>
<div>então segundo seu exemplo vc deveria fazer algo como:</div>
<div> </div>
<div> biplot(dados.pca,xlab="pc1",ylab="pc2", pch(rep(19,6),rep(1,6),rep(2,6))</div>
<div> </div>
<div>ai no caso repete o valor 19 que é bolinha preta 6 vez que é sua primeira especies e assim vai.</div>
<div>a segunda especie vai ser bolinha aberta, que é o numero 1.</div>
<div>O vertor tem que ter o mesmo tamanho do numero de pontos que vai ter no grafico, numero de linhas no caso.</div>
<div>Acho que é mais ou menos isso :)</div>
<div> </div>
<div> </div>
<div>Em 7 de abril de 2011 22:01, Marcelo Claro de Souza <span dir="ltr"><<a rel="nofollow" href="http://mc/compose?to=marcelo_claro@yahoo.com.br" target="_blank">marcelo_claro@yahoo.com.br</a>></span> escreveu:<div>
<div></div>
<div><br>
<blockquote style="border-left:1px solid rgb(204, 204, 204);margin:0px 0px 0px 0.8ex;padding-left:1ex">
<table border="0" cellpadding="0" cellspacing="0">
<tbody>
<tr>
<td valign="top">Walmes,<br>Eu sou bem novato em R e não entendi direito.<br>No caso eu devo usar da seguinte forma por exemplo: biplot(dados.pca,xlab="pc1",ylab="pc2", pch(1:7,8:14,15:21))<br>é mais ou menos isso que tenho de fazer?
<div><br>Muito obrigado.<br><br>
<div style="text-align:left"><font size="4"><span style="color:rgb(0, 0, 255)">Marcelo Claro de Souza</span></font><br></div>
<div><font size="1">Biólogo, Doutorando em Biologia Vegetal, Depto. de botânica, IBRC- UNESP.</font></div>
<div><font size="1">16 - 91914780</font><br><span style="font-size:10pt"><a rel="nofollow" href="http://lattes.cnpq.br/5691388412841376" target="_blank">http://lattes.cnpq.br/5691388412841376</a></span> </div><br><br></div>
--- Em <b>qui, 7/4/11, Walmes Zeviani <i><<a rel="nofollow" href="http://mc/compose?to=walmeszeviani@gmail.com" target="_blank">walmeszeviani@gmail.com</a>></i></b> escreveu:<br>
<blockquote style="border-left:2px solid rgb(16, 16, 255);padding-left:5px;margin-left:5px"><br>De: Walmes Zeviani <<a rel="nofollow" href="http://mc/compose?to=walmeszeviani@gmail.com" target="_blank">walmeszeviani@gmail.com</a>><br>
Assunto: Re: [R-br] Simbolos pré-definidos em função das linhas de uma tabela<br>
Para: <a rel="nofollow" href="http://mc/compose?to=r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a><br>Data: Quinta-feira, 7 de Abril de 2011, 14:51
<div>
<div></div>
<div><br><br>
<div><font face="trebuchet ms,sans-serif">Marcelo,<br><br>O controle dos símbolos é com o argumento pch= {p}oint {ch}aracter dentro das funções gráficas. Em gráficos de dispersão, basta passar um vetor com os índices que identificam os símbolos. Para conhecer os símbolos faça<br>
<br>plot(1:30, pch=1:30)<br><br>Espero que no biplot() seja assim também. Caso não dê certo, forneça um exemplo reproduzível e destaque o erro para que possamos ajudar.<br><br>À disposição.<br>Walmes.<br><br clear="all">
</font><span style="font-family:trebuchet ms,sans-serif">==========================================================================</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">Walmes Marques Zeviani</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">Departamento de Estatística - Universidade Federal do Paraná</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">fone: (+55) 41 3361 3573</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">VoIP: (3361 3600) 1053 1173</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">e-mail: <a rel="nofollow" href="http://mc/compose?to=walmes@ufpr.br" target="_blank">walmes@ufpr.br</a></span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">twitter: @walmeszeviani</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">homepage: <a rel="nofollow" href="http://www.leg.ufpr.br/%7Ewalmes" target="_blank">http://www.leg.ufpr.br/~walmes</a></span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">linux user number: 531218</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">==========================================================================</span><br>
<br><br>
<div>Em 7 de abril de 2011 13:44, Marcelo Claro de Souza <span dir="ltr"><<a rel="nofollow" href="http://mc/compose?to=marcelo_claro@yahoo.com.br" target="_blank">marcelo_claro@yahoo.com.br</a>></span> escreveu:<br>
<blockquote style="border-left:1px solid rgb(204, 204, 204);margin:0pt 0pt 0pt 0.8ex;padding-left:1ex">
<table border="0" cellpadding="0" cellspacing="0">
<tbody>
<tr>
<td valign="top">Possuo um conjunto de dados composto por 21 linhas e 3 colunas.<br>Ao importar os dados eu utilizo o comando row.names e atribuo nome as linhas para facilitar a visualização das espécies na pca (no caso utilizo o pacote vegan e uso o comando rda(dados,scale=TRUE)<br>
nesse conjunto de dados da linha 1 a 7 são plantas da mesma espécie, de 8 a 14 outra e de 16 a 21 a outra. Como eu faço p atribuir um símbolo único para cada espécie (ex: quadrado, circulo e triângulo) ao plotar um biplot?<br>
Muito obrigado.<br><font color="#888888"><br>
<div style="text-align:left"><font size="4"><span style="color:rgb(0, 0, 255)">Marcelo Claro de Souza</span></font><br></div>
<div><font size="1">Biólogo, Doutorando em Biologia Vegetal, Depto. de botânica, IBRC- UNESP.</font></div>
<div><font size="1">16 - 91914780</font><br><span style="font-size:10pt"><a rel="nofollow" href="http://lattes.cnpq.br/5691388412841376" target="_blank">http://lattes.cnpq.br/5691388412841376</a></span><br></div></font></td>
</tr></tbody></table><br>_______________________________________________<br>R-br mailing list<br><a rel="nofollow" href="http://mc/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br><a rel="nofollow" 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>
<br></blockquote></div><br></div><br></div></div>-----Anexo incorporado-----
<div><br><br>
<div>_______________________________________________<br>R-br mailing list<br><a rel="nofollow" href="http://mc/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br><a rel="nofollow" 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>
</div></div></blockquote></td></tr></tbody></table><br>_______________________________________________<br>R-br mailing list<br><a rel="nofollow" href="http://mc/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a rel="nofollow" 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>
<br></blockquote></div></div></div><font color="#888888"><br><br clear="all"><br>-- <br>
<div>Grato<br>Augusto C. A. Ribas</div>
<div> </div>
<div>Site Pessoal: <a rel="nofollow" href="http://augustoribas.heliohost.org/" target="_blank">http://augustoribas.heliohost.org</a></div>
<div>Lattes: <a rel="nofollow" href="http://lattes.cnpq.br/7355685961127056" target="_blank">http://lattes.cnpq.br/7355685961127056</a><br></div><br>
</font><br>_______________________________________________<br>
R-br mailing list<br>
<a rel="nofollow" href="http://mc/compose?to=R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a rel="nofollow" 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>
<br></blockquote></div><br>
</div><br>-----Anexo incorporado-----<br><br><div>_______________________________________________<br>R-br mailing list<br><a href="http://mc/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></div></div></div></blockquote></td></tr></tbody></table><br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">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>
<br></blockquote></div><br><br clear="all"><br>-- <br><div>Grato<br>Augusto C. A. Ribas</div>
<div> </div>
<div>Site Pessoal: <a href="http://augustoribas.heliohost.org/" target="_blank">http://augustoribas.heliohost.org</a></div>
<div>Lattes: <a href="http://lattes.cnpq.br/7355685961127056" target="_blank">http://lattes.cnpq.br/7355685961127056</a><br></div><br>