Olá Humberto,<br><br>Obrigado pela atenção.<br><br>Para fazer da forma como você propõe temos que verificar no cutree quais são os grupos e coloca-los "na mão".<br><br>Meu problema é que estou trabalhando com uma matriz com muitos objetos e não consigo ver no dendrograma os números dos objetos, pois eles se sobrepõem.<br>
<br>Assim, pelo cutree, sei que o objeto 790 está no grupo 5, mais não consigo identificar no dendrograma qual a "perninha" do 790.<br><br>Se escrevermos o comando<br><br>plclust(cluc, labels = as.character(grp))<br>
<br>Substituiremos o nome dos objetos pelo número do grupo, mas para mim também não funcionou pois não consigo ler os números.<br><br>Veja o tutorial do vegan (<a href="http://cc.oulu.fi/~jarioksa/opetus/metodi/vegantutor.pdf">http://cc.oulu.fi/~jarioksa/opetus/metodi/vegantutor.pdf</a>), página 38, as duas primeiras figuras, um dendrograma e um boxplot. Se o leitor não prestar atenção pode interpretar que a maior mediana foi obtida pelo grupo dos objetos 1, 2, ..., 6 e 7. Só que este grupo é o de número 1, que tem a menor mediana. A ordem no dendrograma não é a mesma do boxplot e não há nenhuma indicação no dendrograma que explicite isto.<br>
<br>Vamos pensar mais um pouco ... se tiver mais alguma ideia escreva. De qualquer forma muito obrigado pela atenção.<br><br>Abraços,<br><br>Antônio<br><br><div class="gmail_quote">Em 2 de março de 2012 20:37, Humberto Hazin <span dir="ltr"><<a href="mailto:hghazin@hotmail.com">hghazin@hotmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
  
    
  
  <div bgcolor="#FFFFFF" text="#000000">
    Olá Antonio,<br>
    <br>
    A melhor solução que encontrei para resolver esse problema foi (deve
    haver outra forma melhor, mais funcionou):<div class="im"><br>
    library(vegan)<br>
    data(dune)<br>
    dis <- vegdist(dune)<br>
    cluc <- hclust(dis, "complete")<br>
    plot(cluc)<br>
    rect.hclust(cluc, 3)<br>
    grp <- cutree(cluc, 3)<br>
    grp<br>
    <br></div>
    namesI<-c("I")<br>
    namesII<-c("II")<br>
    namesIII<-c("III")<br>
    legend(0.4,0.98,namesIII,cex=1.5,bty="n",bg ="white",col="white")<br>
    legend(5.2,0.98,namesI,cex=1.5,bty="n",bg ='white')<br>
    legend(14.2,0.98,namesII,cex=1.5,bty="n",bg ='white')<br>
    <br>
    Um abraço<br>
    <br>
    Humberto Hazin<br>
    <br>
    <br>
    <br>
    Em 3/2/2012 8:02 AM, Antonio Silva escreveu:
    <blockquote type="cite"><div><div class="h5">Olá<br>
      <br>
      Gostaria de saber se há como indicar no dendrograma, na altura do
      corte, o número referente ao grupo, como indicado em cutree.<br>
      <br>
      Observei que em alguns dendrogramas que os grupos selecionados de
      acordo com um dado o nível de corte não seguem necessariamente uma
      ordem ascendente (grupo 3 pode não ser o terceiro da esquerda para
      direita).<br>
      <br>
      Seria algo semelhante ao da figura <a href="https://www.crops.org/images/publications/cs/42/5/1584f4.jpeg" target="_blank">https://www.crops.org/images/publications/cs/42/5/1584f4.jpeg</a>
      <br>
      <br>
      Por exemplo exemplo:<br>
      <br>
      library(vegan)<br>
      data(dune)<br>
      dis <- vegdist(dune)<br>
      cluc <- hclust(dis, "complete")<br>
      plot(cluc)<br>
      rect.hclust(cluc, 3)<br>
      grp <- cutree(cluc, 3)<br>
      grp<br>
      <br>
      Notem que o grupo com os objetos 17, 19, 11 e 18, posicionado a
      esquerda no dedrograma é o grupo de número 3, e o grupo com os
      objetos 1,2, ..., 7, representado no meio do dendrograma é o de
      número 1.<br>
      <br>
      Eu gostaria que, no nível de corte, aparecesse no dendrograma, ao
      lado das barras verticais de cada cluster, a indicação 3, 1, 2.<br>
      <br>
      Agradeço qualquer dica. Abraços<br>
      <br>
      Antônio<br clear="all">
      <br>
      -- <br>
      Antônio Olinto Ávila da Silva
      <div>
        Biólogo / Oceanógrafo</div>
      <div>Instituto de Pesca</div>
      <div>São Paulo, Brasil</div>
      <br>
      <br>
      <fieldset></fieldset>
      <br>
      </div></div><pre>_______________________________________________
R-br mailing list
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a>
<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>
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.</pre>
    </blockquote>
    <br>
  </div>

<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>
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 clear="all"><br>-- <br>Antônio Olinto Ávila da Silva<div>
Biólogo / Oceanógrafo</div><div>Instituto de Pesca (Fisheries Institute)</div><div>São Paulo, Brasil</div><br>